?????????? ????????? - ??????????????? - /home/.cpan/build/Test-Fatal-0.017-0/examples/exception_like.t
???????
use strict; use warnings FATAL => 'all'; use Test::More; use Test::Fatal; use Carp 'confess'; sub exception_like(&$;$) { my ($code, $pattern, $name) = @_; like( &exception($code), $pattern, $name ); } exception_like(sub { confess 'blah blah' }, qr/foo/, 'foo seems to appear in the exception'); # the test only passes when we invert it unlike( ( exception { confess 'blah blah' } || '' ), qr/foo/, 'foo does NOT ACTUALLY appear in the exception', ); done_testing;
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0.01 |
proxy
|
phpinfo
|
???????????