?????????? ????????? - ??????????????? - /home/.cpan/build/Test-Deep-1.204-0/t/regexpref.t
???????
use strict; use warnings; use lib 't/lib'; use Std; my $xism = qr/x/=~/\(\?\^/ ? "^" : "-xism"; { check_test( sub { cmp_deeply(qr/a/, qr/a/, "regexp ref eq"); }, { name => "regexp ref eq", actual_ok => 1, diag => "", } ); check_test( sub { cmp_deeply(qr/a/, qr/b/, "regexp ref not eq"); }, { name => "regexp ref not eq", actual_ok => 0, diag => <<EOM, Compared m/\$data/ got : (?$xism:a) expect : (?$xism:b) EOM } ); }
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0 |
proxy
|
phpinfo
|
???????????