Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!wuarchive!uunet!clyde.concordia.ca!s3!gamin
From: gamin@ireq-robot.hydro.qc.ca (Martin Boyer)
Newsgroups: comp.lang.perl
Subject: pl28 op.stat FAILED on test 35
Keywords: Sun3, SunOS 4.0.3
Message-ID: <2815@s3.ireq.hydro.qc.ca>
Date: 10 Sep 90 17:31:06 GMT
Sender: root@s3.ireq.hydro.qc.ca
Reply-To: gamin@ireq-robot.hydro.qc.ca (Martin Boyer)
Organization: Laboratoire de robotique, Institut de recherche d'Hydro-Quebec
Lines: 34


I get the following message from 'make test', using perl 3.0,
patchlevel 28 on a Sun3 running SunOS 4.0.3.  Compiled with cc -O2.

op.stat.........FAILED on test 35

The relevant part in op.stat is:

----------------

$cnt = $uid = 0;

die "Can't run op.stat test 35 without pwd working" unless $cwd;
chdir '/usr/bin' || die "Can't cd to /usr/bin";
while (<*>) {
    $cnt++;
    $uid++ if -u;
    last if $uid && $uid < $cnt;
}
chdir $cwd || die "Can't cd back to $cwd";

# I suppose this is going to fail somewhere...
if ($uid > 0 && $uid < $cnt) {print "ok 35\n";} else {print "not ok 35\n";}

----------------

What's wrong?
Should I worry about it?

--
Martin Boyer                            mboyer@ireq-robot.hydro.qc.ca
Institut de recherche d'Hydro-Quebec    mboyer@ireq-robot.uucp
Varennes, QC, Canada   J3X 1S1
+1 514 652-8136