if ($string =~ /\[message\]/ and $string =~ /\[here\]/ ){ ...

##</code><code>##

if (/\[message\]/ and /\[here\]/ ){ ...

##</code><code>##

if ($string1 =~ /\[message\]/ and $string2 =~ /\[here\]/ ){ ...