diff options
Diffstat (limited to 'gnu/usr.bin/perl/t/io/inplace.t')
-rw-r--r-- | gnu/usr.bin/perl/t/io/inplace.t | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/gnu/usr.bin/perl/t/io/inplace.t b/gnu/usr.bin/perl/t/io/inplace.t index ff410a7b5fc..a97add566c0 100644 --- a/gnu/usr.bin/perl/t/io/inplace.t +++ b/gnu/usr.bin/perl/t/io/inplace.t @@ -13,6 +13,18 @@ if ($^O eq 'MSWin32') { `.\\perl -le "print 'foo'" > .b`; `.\\perl -le "print 'foo'" > .c`; } +elsif ($^O eq 'NetWare') { + $CAT = 'perl -e "print<>"'; + `perl -le "print 'foo'" > .a`; + `perl -le "print 'foo'" > .b`; + `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`; +} elsif ($^O eq 'VMS') { $CAT = 'MCR []perl. -e "print<>"'; `MCR []perl. -le "print 'foo'" > ./.a`; |