if ($filename =~ /(\.(?:htm|html|txt|pdf|ppt|csv|doc]))\b/i)