X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Flex_assign.t;h=c6c424d26e08d7dc55b2a9f9622a17d633048e7a;hb=21fa6956243df9cb622bebfa0934ea7923519b4f;hp=d761f73ce7c3b46a79848c710f30eaa089578680;hpb=5cfc78421f161e223f47fcc0aa3d4d3fa5f3976e;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/op/lex_assign.t b/t/op/lex_assign.t
index d761f73..c6c424d 100755
--- a/t/op/lex_assign.t
+++ b/t/op/lex_assign.t
@@ -5,9 +5,10 @@ BEGIN {
     @INC = '../lib';
 }
 
+$| = 1;
 umask 0;
 $xref = \ "";
-$runme = ($^O eq 'VMS' ? 'MCR ' : '') . $^X;
+$runme = $^X;
 @a = (1..5);
 %h = (1..6);
 $aref = \@a;
@@ -264,7 +265,7 @@ open BLAH, "<non-existent"	# open
 fileno STDERR			# fileno
 umask 0				# umask
 select STDOUT			# sselect
-select "","","",0		# select
+select undef,undef,undef,0	# select
 getc OP				# getc
 '???'				# read
 '???'				# sysread