Rob Dixon schreef: > use strict; > use warnings; > > my @dir = do { > opendir my $dh, 'C:\build\Sample\NewDir' or die $!; > grep -f, readdir $dh;
For newbies, maybe put a comment here that the closedir() is implicit. > }; > > print "$_\n" foreach @dir; -- Affijn, Ruud "Gewoon is een tijger." -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>