![]() |
|
P is for Practical | |
PerlMonks |
Re(2): path grepingby Arien (Pilgrim) |
on Aug 29, 2002 at 22:35 UTC ( [id://193940]=note: print w/replies, xml ) | Need Help?? |
next unless m|^.*.txt\z|s; According to this regex a filename without extension with at least 4 characters ending in txt matches. To match .txt files: next unless /\.txt\z/s;To find out the directory your are looking at, use $File::Find::dir. — Arien
In Section
Seekers of Perl Wisdom
|
|