Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!usc!cs.utexas.edu!uunet!math.fu-berlin.de!fub!geminix.in-berlin.de!gemini
From: gemini@geminix.in-berlin.de (Uwe Doering)
Newsgroups: comp.lang.perl
Subject: Re: Problem with perl4
Message-ID: <SKEP7NK@geminix.in-berlin.de>
Date: 26 Mar 91 14:15:16 GMT
References: <9934@rjf001.UUCP>
Organization: Private UNIX Site
Lines: 39

freedman@rjf001.uucp (Richard J. Freedman) writes:

>When I run the following program with perl4 
>
> [stuff deleted]
>
>if (system "true") {print "not ok 5\n";} else {print "ok 5\n";}
>
> [stuff deleted]
>
>I get the following:
>
>ok 3
>ok 4
>not ok 5
>not ok 6
>ok 7
>not ok 8
>
>Clearly, the "not ok 5",  is not ok.
>
>Does anyone have a suggestion as to what is amiss?  When I run perl3.44
>I get the correct result.

This works for me. That is, I get `ok 5' on my SysVr3.2 system. Are you
sure that there is a `true' program in one of the directories that are
in your PATH environment variable? I found out that on some SysVr3.x
systems the `true' program (actually, it's a shell script that returns
an exit status of `0') is simply missing, and therefore, perl can't
find it and reports `not ok 5'.

If it worked unter perl 3.44, are you sure that nothing on your system that
could cause this problem has changed in the mean time?

     Uwe
-- 
Uwe Doering  |  INET : gemini@geminix.in-berlin.de
Berlin       |----------------------------------------------------------------
Germany      |  UUCP : ...!unido!fub!geminix.in-berlin.de!gemini