Sara wrote:
>
> - Original Message - From: "Ovid"
>
>> --- Sara <[EMAIL PROTECTED]> wrote:
>>
>>> while (my $row = $sth->fetchrow_hashref)
>>> {
>>> if (grep /$row->{CAT_TITLE}/, @present) {
>>> #matching title with @present elements
>>> print "$row->{CAT_TITLE}";
>>> }
>>>
>>> Ques
The if statement below does not seem to work as expected//
Given in the HTML:
Choose type message
Comment about a recent performance or recording
Concert or Event Booking inquiry
Personal message
and in the perl:
#!/usr/local/bin/perl
use CGI qw/:standard/;
use strict;
#and other stuff...
