Hello,
When I execute: "perl my_cgi_lib.m",
I have this problem:
"Global symbol "$key" requires explicit package name at
/usr/lib/perl5/5.6.0/my_cgi_lib.pm line 34.
Global symbol "$key" requires explicit package name at
/usr/lib/perl5/5.6.0/my_cgi_lib.pm line 38.
Global symbol "$key" requires explicit package name at
/usr/lib/perl5/5.6.0/my_cgi_lib.pm line 40.
Global symbol "$key" requires explicit package name at
/usr/lib/perl5/5.6.0/my_cgi_lib.pm line 44."
my_cgi_lib is:
"34 ($key, $value)=split(/=/,$key_value);
35 $value=~tr/+/ /;
36 # Decodage des caracteres speciaux
37 $value=~ s/%(..)/pack("c",hex($1))/eg;
38 if(defined($formdat{$key}))
39 {
40 $formdat{$key} .="\0" . $value;
}
else
{
44 $formdat{$key}=$value;
}"
What's the problem?
_________________________________________________________
Le journal des abonnés Caramail - http://www.carazine.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
