diff options
Diffstat (limited to 'contrib/perl5/t/UTEST')
| -rwxr-xr-x | contrib/perl5/t/UTEST | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/contrib/perl5/t/UTEST b/contrib/perl5/t/UTEST index b5f285b..9c1dfc0 100755 --- a/contrib/perl5/t/UTEST +++ b/contrib/perl5/t/UTEST @@ -81,7 +81,10 @@ EOT if ($type eq 'perl') { open(RESULTS, "./$test |") || (print "can't run.\n"); } else { - open(RESULTS, "./perl -I../lib ../utils/perlcc ./$test -run -verbose dcf -log ../compilelog |") or print "can't compile.\n"; + open(RESULTS, "./perl -I../lib ../utils/perlcc -o ./$test.plc ./$test " + ." && ./$test.plc |") + or print "can't compile.\n"; + unlink "./$test.plc"; } } else { |
