NetWare port from Guruprasad S <SGURUPRASAD@novell.com>.

[perl5.git] / t / op / rand.t

diff --git a/t/op/rand.t b/t/op/rand.t
index 2f02d34..e365e59 100755 (executable)
--- a/t/op/rand.t
+++ b/t/op/rand.t
@@ -17,7 +17,7 @@
 
 BEGIN {
     chdir "t" if -d "t";
-    @INC = "../lib" if -d "../lib";
+    @INC = '../lib';
 }
 
 use strict;
@@ -342,6 +342,7 @@ AUTOSRAND:
     for (1..5) {
        my $PERL = (($^O eq 'VMS') ? "MCR $^X"
                    : ($^O eq 'MSWin32') ? '.\perl'
+                   : ($^O eq 'NetWare') ? 'perl'
                    : './perl');
        $pid = open PERL, qq[$PERL -e "print rand"|];
        die "Couldn't pipe from perl: $!" unless defined $pid;