Why do you add /m to your regular expressions? See perlop - /m changes the meaning of $ and ^.