@blocks = map { quotemeta($_) } @blocks;
... $FORM{'comments'} =~ /\b$_\b/