diff options
Diffstat (limited to 't/op/magic.t')
-rwxr-xr-x | t/op/magic.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/magic.t b/t/op/magic.t index b338d9600a..c2be2e5e68 100755 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -94,9 +94,9 @@ ok 13, (keys %h)[0] eq "foo\034bar", (keys %h)[0]; } # $?, $@, $$ -system "$PERL -e 'exit(0)'"; +system qq[$PERL -e "exit(0)"]; ok 15, $? == 0, $?; -system "$PERL -e 'exit(1)'"; +system qq[$PERL -e "exit(1)"]; ok 16, $? != 0, $?; eval { die "foo\n" }; |