ACIL FM
Dark
Refresh
Current DIR:
/usr/share/doc/perl-Test-Simple/t/Test2/modules/EventFacet
/
usr
share
doc
perl-Test-Simple
t
Test2
modules
EventFacet
Upload
Zip Selected
Delete Selected
Pilih semua
Nama
Ukuran
Permission
Aksi
About.t
521 B
chmod
View
DL
Edit
Rename
Delete
Amnesty.t
512 B
chmod
View
DL
Edit
Rename
Delete
Assert.t
514 B
chmod
View
DL
Edit
Rename
Delete
Control.t
726 B
chmod
View
DL
Edit
Rename
Delete
Error.t
500 B
chmod
View
DL
Edit
Rename
Delete
Info.t
491 B
chmod
View
DL
Edit
Rename
Delete
Meta.t
660 B
chmod
View
DL
Edit
Rename
Delete
Parent.t
590 B
chmod
View
DL
Edit
Rename
Delete
Plan.t
553 B
chmod
View
DL
Edit
Rename
Delete
Trace.t
1.21 MB
chmod
View
DL
Edit
Rename
Delete
Edit file: /usr/share/doc/perl-Test-Simple/t/Test2/modules/EventFacet/Meta.t
use strict; use warnings; use Test2::Tools::Tiny; use ok 'Test2::EventFacet::Meta'; my $CLASS = 'Test2::EventFacet::Meta'; my $one = $CLASS->new(details => 'foo', a => 1, b => 'bar', x => undef, set_details => 'xxx'); is($one->details, "foo", "Got details"); is($one->set_details, "xxx", "set_details is a regular field, not a writer"); is($one->a, 1, "Got 'a'"); is($one->b, 'bar', "Got 'b'"); is($one->x, undef, "Got 'x'"); is($one->blah, undef, "Vivified 'blah'"); is_deeply($one->clone, $one, "Cloning."); isnt($one->clone, $one, "Clone is a new ref"); ok(!$CLASS->is_list, "is not a list"); is($CLASS->facet_key, 'meta', "Got key"); done_testing;
Simpan
Batal
Isi Zip:
Unzip
Create
Buat Folder
Buat File
Terminal / Execute
Run
Chmod Bulk
All File
All Folder
All File dan Folder
Apply