develooper Front page | perl.perl5.porters | Postings from December 2000

Jim Minton: Re: Perlbug ID 19991102.001

From:
Stephen P. Potter
Date:
December 15, 2000 11:13
Subject:
Jim Minton: Re: Perlbug ID 19991102.001
Message ID:
200012152012.PAA04652@spotter.yi.org

------- Forwarded Message

Date: Fri, 15 Dec 2000 08:58:04 -0800
From: Jim Minton <minton1@llnl.gov>
Subject: Re: Perlbug ID 19991102.001

>Last year, you reported:
>
>We are seening a problem with perl-5.005.02 on AIX 4.2.1. We run the
>  following
>  perl script to list the contents of a directory.
>
>  file name: xxxx
>  contents:
>  >#!/usr/local/bin/perl
>  >
>  >
>  >
>  >    $NewDir =3D '/home/minton/NameServer/4v1/Tools/NSDE/new';
>  >    print "\nPathName: $NewDir\n";
>  >    undef @NewFiles;
>  >    if ( ! opendir(DIRHANDLE, "$NewDir") )
>  >    {
>  >        die "  >> Can't open directory '$NewDir'.\n";
>  >    }
>  >
>  >#    @NewFiles =3D grep(!/^\.|makefile/, readdir(DIRHANDLE));
>  >    @NewFiles =3D readdir(DIRHANDLE);
>  >
>  >    closedir ( DIRHANDLE );
>  >
>  >
>  >   print "\nNF=3D'@NewFiles'\n";
>
>
>  We get the following results:
>
>  >$ls -l /home/minton/NameServer/4v21/Tools/NSDE/new
>  >total 70
>  >drwxrws---   2 minton   hpss        1024 Nov 01 17:48 ./
>  >drwxrws---   3 minton   hpss        1024 Nov 01 17:48 ../
>  >-rw-rw----   1 minton   hpss      234447 Oct 29 13:15 nsde.c
>  >-rw-rw----   1 minton   hpss       38366 Oct 29 13:15 nsdestuff.h
>  >
>  >$xxxx
>  >
>  >PathName:  /home/minton/NameServer/4v21/Tools/NSDE/new
>  >NF=3D'. .. nsde.c nsdest'
>
>  It appears that part of the array that contains the directory contents
>  is
>  truncated ("nsdest" instead of "nsdestuff.h"). Is this a known problem?
>  Is there a patch level that fixes this problem.
>
>Do you still see this problem, has it been fixed in a newer version of
>perl, or did you find the cause?  Should this bug remain open?

Yes, I still see this problem, but only on one machine! There is a 
machine in Houston that has this problem 'big time'. Here is some 
very recent evidence of the problem--

/home/minton/NameServer/4v1/Tools/NSDE/new[4]ls -l
total 2
drwxrws---   2 minton   hpss        1024 Dec 15 10:18 ./
drwxrws---   3 minton   hpss        1024 Jun 09 2000  ../
- -rw-rw----   1 minton   hpss           0 Dec 15 10:44 abcdefghij
- -rw-rw----   1 minton   hpss           0 Dec 15 10:44 jihgfedcba
- -rw-rw----   1 minton   hpss           0 Dec 15 10:44 poiuytrewq
- -rw-rw----   1 minton   hpss           0 Dec 15 10:44 qwertyuiop
/home/minton/NameServer/4v1/Tools/NSDE/new[5]xxxx

PathName: /home/minton/NameServer/4v1/Tools/NSDE/new

NF=3D'. .. abcdefghij@=B1jihgfedcba
                                T=A541qwertyuiopz=B5poiuytrewq |=FD=C36 jihg=
 
qwertyuiopz=B5poiuytrewq |=FD=C36abcdefghij@=B1jihgfedcba
                                      T=A541qwertyuiopz=B5poiuytrewq |=FD=C3=
6 
poiuytrewq'

------- End of Forwarded Message




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About