On 8/24/07, Marian Bednar <[EMAIL PROTECTED]> wrote:
snip
> print "$_->{filename} \n" if -f $_->{filename};
snip
> Script above write out nothing, but if last line is this
>
> print "$_->{filename} \n";
>
> It writes out names of files, directories, but I need only names of files.
> How can I get it easy?
snip
either of these should work.
print "$_->{filename}\n" unless $_->{longname} =~ /^d/;
print "$_->{filename}\n" unless $_->{a}->perm() & 16384;
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
