diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-16 19:46:38 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-16 19:46:38 +0000 |
| commit | 2986a63f7e513cf37f46db9f211b77071260031f (patch) | |
| tree | 9a6e62602396938ea5a612420f53ebf267e8d941 /t/io/inplace.t | |
| parent | 87b11a197a59fac210fc9265bde0ef1ffe36de89 (diff) | |
| download | perl-2986a63f7e513cf37f46db9f211b77071260031f.tar.gz | |
NetWare port from Guruprasad S <SGURUPRASAD@novell.com>.
p4raw-id: //depot/perl@10643
Diffstat (limited to 't/io/inplace.t')
| -rwxr-xr-x | t/io/inplace.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/t/io/inplace.t b/t/io/inplace.t index ff410a7b5f..4582cc232a 100755 --- a/t/io/inplace.t +++ b/t/io/inplace.t @@ -13,6 +13,12 @@ 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 'VMS') { $CAT = 'MCR []perl. -e "print<>"'; `MCR []perl. -le "print 'foo'" > ./.a`; |