if($filecontents =~ /\Q$word/) {