✏️ 正在编辑: 870-experimental-warnings.t
路径:
/usr/share/doc/perl-Test-Simple/t/Legacy/Regression/870-experimental-warnings.t
提示:
您可以编辑任何文件（包括二进制文件），但请注意不当修改可能导致文件损坏。
use strict; use warnings; use Test2::Tools::Tiny; BEGIN { skip_all "Only testing on 5.18+" if $] < 5.018 } require Test::More; *cmp_ok = \&Test::More::cmp_ok; no warnings "experimental::smartmatch"; my $warnings = warnings { cmp_ok(1, "~~", 1) }; ok(!@$warnings, "Did not get any warnings"); done_testing;
💾 保存文件
← 返回文件管理器