Singing Banzo wrote: > > I think this is a very basic warning, but I coudn't find the way to avoid it > (tried google, faq, and archive): > > Use of uninitialized value in pattern match (m//) at poComen.cgi line 138. > > line 138: > if ($q->param('template') =~ /^[1234]$/) { # trying to find out if the > value of a form parameter is a digit between 1 and 4
The warning means that the value of $q->param('template') is undef. > This only happens with "use strict". > > How can I get rid of it? if ( defined $q->param('template') and $q->param('template') =~ /^[1234]$/ ) { John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]