in reply to How to find out a compressed file inside a script ?
Hi balakrishnan,
try the below code and add your extensions as per your requirement,
$filename =~ /\.(zip|gzip|txt)$/i
Also you can use File::Basename to get the file extensions exactly.
Prasad
In Section
Seekers of Perl Wisdom