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>


Reply via email to