Date: 2014jul8 Language: Perl Q. Perl: Is there a shorthand for a non-match? A. Yes, use !~ Ugly way:

if (!($filename =~ m/\.ini$/)) { print "not an ini file\n"; }

More compact way:

if ($filename !~ m/\.ini$/) { print "not an ini file\n"; }