Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re^3: Perl CGI.PM: Use of uninitialized value $vals

by poj (Abbot)
on Apr 30, 2018 at 09:17 UTC ( #1213801=note: print w/replies, xml ) Need Help??


in reply to Re^2: Perl CGI.PM: Use of uninitialized value $vals
in thread Perl CGI.PM: Use of uninitialized value $vals

What version of CGI do you have ?. In 3.65 the code was

sub STORE { my $self = shift; my $tag = shift; my $vals = shift; my @vals = index($vals,"\0")!=-1 ? split("\0",$vals) : $vals; $self->param(-name=>$tag,-value=>\@vals); }

In 4.37 it is

sub STORE { my $self = shift; my $tag = shift; my $vals = shift; my @vals = defined($vals) && index($vals,"\0")!=-1 ? split("\0",$v +als) : $vals; $self->param(-name=>$tag,-value=>\@vals); }
poj

Replies are listed 'Best First'.
Re^4: Perl CGI.PM: Use of uninitialized value $vals
by Anonymous Monk on Apr 30, 2018 at 09:46 UTC
    Was 4.22. Have upgraded to 4.38. Thank you)))

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1213801]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2019-10-16 10:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?