X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=t%2F30-scope.t;h=956b71ed684fa1e66021d9441ff39cdd6e782848;hp=a63bf04c012eadd15f1a1191f88fc86853ef2f0b;hb=2286eff4b9037d37be6268664973754e10c08924;hpb=aa72f12e5ecd567cb01d8fa0ae986b5354502d11 diff --git a/t/30-scope.t b/t/30-scope.t index a63bf04..956b71e 100644 --- a/t/30-scope.t +++ b/t/30-scope.t @@ -1,4 +1,4 @@ -#!perl -T +#!perl use strict; use warnings; @@ -153,6 +153,7 @@ sub expect { is $@, '', 'RT #47902'; } +# This test may not fail for the old version when ran in taint mode { my $err = eval <<' SNIP'; use indirect::TestRequired4::a0;