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.
A subterranean mammal
A skin blemish
A sprained ankle
A Childrens Book
The Marvel Comics supervillain
The unit of measure
Wie is de Mol
A futuristic drilling vehicle
The Wind in The Willows
Results (247 votes). Check out past polls.