You have a quotemeta problem, a dot (for one) is special in regexes. Replace

        if($filecontents =~ /$word/smg) {
[download]

with

        if($filecontents =~ /\Q$word/smg) {
[download]

and now you can do literal searches.