diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-07-12 03:01:29 +0300 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-07-12 06:53:22 +0000 |
| commit | 250d67eb8e42c118b44bb5437965a1f4a8a0d828 (patch) | |
| tree | c6ac564b44f2431bc6554af7cebdda630779f5c0 /t/op/exec.t | |
| parent | 6c20a8f90405579db59be381a23b6fc12073fdbd (diff) | |
| download | perl-250d67eb8e42c118b44bb5437965a1f4a8a0d828.tar.gz | |
z/OS: t/ - mostly EBCDIC fixes
Message-Id: <200607112101.k6BL1TGr321715@kosh.hut.fi>
p4raw-id: //depot/perl@28550
Diffstat (limited to 't/op/exec.t')
| -rwxr-xr-x | t/op/exec.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/exec.t b/t/op/exec.t index a6eeeb522f..c13849199a 100755 --- a/t/op/exec.t +++ b/t/op/exec.t @@ -96,7 +96,7 @@ unless( ok($rc == 255 << 8 or $rc == -1 or $rc == 256 or $rc == 512) ) { unless ( ok( $! == 2 or $! =~ /\bno\b.*\bfile/i or $! == 13 or $! =~ /permission denied/i or - $! == 22 or $! =~ /invalid argument/ ) ) { + $! == 22 or $! =~ /invalid argument/i ) ) { printf "# \$! eq %d, '%s'\n", $!, $!; } |