diff --git a/t/testutil.pl b/t/testutil.pl index 981b659b..35a565c8 100644 --- a/t/testutil.pl +++ b/t/testutil.pl @@ -29,7 +29,7 @@ # perls the burden of avoiding warnings becomes too large, and someone still # trying to use such outmoded versions should be willing to accept warnings in # our test suite. -$SIG{__WARN__} = sub { die "Fatalized: $_[0]" } if $] ge "5.6.0"; +$SIG{__WARN__} = sub { die "Fatalized: $_[0]" } if "$]" >= 5.006; # This defines ASCII/UTF-8 vs EBCDIC/UTF-EBCDIC $::IS_ASCII = ord 'A' == 65;