Re: bareword error

= is for assignment
=~ is a binding operator for regex's

A match regex needs to delimited by set of 2 symbols not 3.

if ($FORM {'comments'}  =~ m/http|html|HTML|A HREF|a href/i)

Should fix it.
UPDATE: added comment about delimiters