summaryrefslogtreecommitdiff
path: root/t/io/iprefix.t
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-04-28 20:26:30 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-04-28 20:26:30 +0000
commitdc459aad73ffc3aaf43c03d9908415c433fd93ba (patch)
tree981bdcf9828bbd255b79fd1181324eb2b45d8a61 /t/io/iprefix.t
parent21f5a6076e634a7ee61d6f5aa4e44bf6708db9fb (diff)
downloadperl-dc459aad73ffc3aaf43c03d9908415c433fd93ba.tar.gz
Integrate #16254 from macperl;
Fix most tests on MacOS (not yet ext/ or /lib) p4raw-id: //depot/perl@16257
Diffstat (limited to 't/io/iprefix.t')
-rwxr-xr-xt/io/iprefix.t6
1 files changed, 6 insertions, 0 deletions
diff --git a/t/io/iprefix.t b/t/io/iprefix.t
index 6070223454..a845040f3d 100755
--- a/t/io/iprefix.t
+++ b/t/io/iprefix.t
@@ -25,6 +25,12 @@ elsif ($^O eq 'VMS') {
`MCR []perl. -le "print 'foo'" > ./.b`;
`MCR []perl. -le "print 'foo'" > ./.c`;
}
+elsif ($^O eq 'MacOS') {
+ $CAT = "$^X -e \"print<>\"";
+ `$^X -le "print 'foo'" > .a`;
+ `$^X -le "print 'foo'" > .b`;
+ `$^X -le "print 'foo'" > .c`;
+}
else {
$CAT = 'cat';
`echo foo | tee .a .b .c`;