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.
Priority 1, Priority 2, Priority 3
Priority 1, Priority 0, Priority -1
Urgent, important, favour
Data loss, bug, enhancement
Out of scope, out of budget, out of line
Family, friends, work
Impossible, inconceivable, implemented
Results (60 votes),