note
chargrill
<p>You can't do that.</p>
<p>You'll need something like:</p>
<c>
for my $item( @FORM{ qw/Comments addr name/ } ){
if( $item =~ m/http|html|A HREF/i) {
&html_message;
}
}
</c>
<p>Other notes: you don't need the HTML and html with the <c>/i</c> at the end of your regex</p>
<p>Your test for HTML is a little naive.</p>
<p>Your test was just testing:</p>
<c>
if( there's anything in Comments
or
there's anything in addr
or
name matches regex ){
&html_message;
}
</c>
<div class="pmsig"><div class="pmsig-474411">
<br>
--chargrill
<hr>
<font size=2>
<code>
s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
</code>
</font>
</div></div>
675538
675538