Adding in TestSetup.pm to replace BEGIN preamble on tests.
[p5sagit/p5-mst-13.2.git] / t / op / regexp_noamp.t
index 03c19e9..088bd40 100755 (executable)
@@ -3,7 +3,7 @@
 $skip_amp = 1;
 for $file ('op/regexp.t', 't/op/regexp.t') {
   if (-r $file) {
-    do $file;
+    do "./$file";
     exit;
   }
 }