$file ="-(lala)-"; $skip ="-(lala)-"; print "$skip / $file\n"; if ($file =~ /\Q$skip\E/i) { print "matched!\n"; }