diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2003-03-22 16:19:37 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2003-03-22 16:19:37 +0000 |
| commit | b22e3d310771329c3f97e9828ae50e660ce1776a (patch) | |
| tree | 775d8c4d95844072d3bd8b52fda0a3fb203498ac /t/op/taint.t | |
| parent | 1820c1a086c8157b005439e2c5ceb6a39ef629ea (diff) | |
| parent | 2d74ac5a945cbb18a3c980e95584765fe36a2594 (diff) | |
| download | perl-b22e3d310771329c3f97e9828ae50e660ce1776a.tar.gz | |
Integrate mainline
p4raw-id: //depot/perlio@19046
Diffstat (limited to 't/op/taint.t')
| -rwxr-xr-x | t/op/taint.t | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 686354ed2f..846e1fd8fd 100755 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -966,8 +966,12 @@ else eval { system("lskdfj does not exist","with","args"); }; test 204, $@ eq ''; - eval { exec("lskdfj does not exist","with","args"); }; - test 205, $@ eq ''; + if ($Is_MacOS) { + print "ok 205 # no exec()\n"; + } else { + eval { exec("lskdfj does not exist","with","args"); }; + test 205, $@ eq ''; + } # If you add tests here update also the above skip block for VMS. } |