X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Flex_assign.t;h=fb9fe4e95c0e646013ab71b94995bca5a7dbf1e4;hb=a4c04bdcc508b6a45f83e703d0f82401445aa55b;hp=ee74d93478a253b5394c3d7ed7327de82d533f84;hpb=5da4baf7965da69c0b59c8683d446777cff89c61;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/op/lex_assign.t b/t/op/lex_assign.t index ee74d93..fb9fe4e 100755 --- a/t/op/lex_assign.t +++ b/t/op/lex_assign.t @@ -4,8 +4,8 @@ BEGIN { chdir 't' if -d 't'; @INC = '../lib'; } -$ENV{PERL_DESTRUCT_LEVEL} = 0 unless $ENV{PERL_DESTRUCT_LEVEL} > 3; +$| = 1; umask 0; $xref = \ ""; $runme = ($^O eq 'VMS' ? 'MCR ' : '') . $^X;