in reply to How to find out a compressed file inside a script ?
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.
An electronic device
Being the designated driver
Spending time with a celebrity
I never won anything
I never play the lottery
I haven't checked my spam folder recently
Results (365 votes). Check out past polls.