Implement new regex escape \N
[p5sagit/p5-mst-13.2.git] / t / op / anonsub.t
old mode 100755 (executable)
new mode 100644 (file)
index ddfcd47..970440b
@@ -32,7 +32,7 @@ for (@prgs){
     print TEST "$prog\n";
     close TEST or die "Could not close: $!";
     my $results = $Is_VMS ?
-               `MCR $^X "-I[-.lib]" $switch $tmpfile 2>&1` :
+               `$^X "-I[-.lib]" $switch $tmpfile 2>&1` :
                  $Is_MSWin32 ?
                    `.\\perl -I../lib $switch $tmpfile 2>&1` :
                      $Is_MacOS ?