Re: readdir() only returns one result when used with Fatal.pm

From this site:

On Thu, Mar 23, 2006 at 02:03:57PM +0100, Rafael Garcia-Suarez wrote:
> Tom Hukins (via RT) wrote:
> > Fatal.pm and readdir() do not play well together.  Run the followi
+ng
> > script in a directory containing several files.  It only prints ou
+t '.'.
> > Then comment out the 'use Fatal' line and run the script again.  I
+t now
> > prints out all the files in the directory.
> > 
> > #!/usr/bin/perl
> > 
> > use strict;
> > use warnings;
> > 
> > use Fatal qw(readdir);
> > 
> > my $start_dir = '.';
> > opendir(my $dir, $start_dir);
> > my [at]subdir = readdir $dir;
> > closedir $dir;
> > print "@subdir\n";
>
[download]

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

Comment on Re: readdir() only returns one result when used with Fatal.pm Download Code

Replies are listed 'Best First'.
Re^2: readdir() only returns one result when used with Fatal.pm by gellyfish (Monsignor) on Oct 06, 2006 at 21:30 UTC
It's interesting that this wasn't noticed before as not only have at least two regular p5p contributors replied in this thread but the original author of the bug report can occasionally be found here. I suppose it just goes to show how uncritical we all are when we don't suspect something might be afoot. /J\	[reply]