$line =~ s/\btest\b/^\#/ig