D7net
Home
Console
Upload
information
Create File
Create Folder
About
Tools
:
/
proc
/
thread-self
/
root
/
usr
/
share
/
doc
/
perl-Test-Simple
/
t
/
Legacy
/
Regression
/
Filename :
6_cmp_ok.t
back
Copy
use Test::More; use Test2::API qw/intercept/; my $events = intercept { local $SIG{__WARN__} = sub { 1 }; my $foo = undef; cmp_ok($foo, "ne", ""); }; is($events->[-1]->message, <<EOT, "Got useful diag"); undef ne '' EOT done_testing;
Name
Size
Last Modified
Owner
Permissions
Actions
637.t
1.23
KB
March 30 2018 5:53:02
root
0644
683_thread_todo.t
0.418
KB
March 30 2018 5:53:02
root
0644
6_cmp_ok.t
0.259
KB
March 30 2018 5:53:02
root
0644
736_use_ok.t
0.764
KB
March 30 2018 5:53:02
root
0644
789-read-only.t
0.656
KB
March 30 2018 5:53:02
root
0644
2017 © D7net | D704T team