Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

Re: Manually add parameters in perl cgi ( no ReadParse no CGI->Vars

by Anonymous Monk
on Sep 05, 2014 at 20:07 UTC ( #1099727=note: print w/replies, xml ) Need Help??

in reply to Manually add parameters in perl cgi

I've done stuff with param() and URI, but none of them work. Any advice?

Can you show that "stuff"?

Also, "new CGI" does not mix with ReadParse , and ReadParse is just another word for CGI->new->Vars, and CGI->new->Vars is broken by design

use CGI->param instead of CGI->Vars , CGI->Vars has caveats , its broken by design

$ perl -MCGI -e " CGI::ReadParse(); dd( \%in )" ro=row ro=you bo=boat +bo=diddly { # tied CGI bo => "boat\0diddly", ro => "row\0you", }
You know what \0 is? Its null character ...
use Data::Dump qw/ dd /; use CGI; my $q = CGI->new('ro=row;ro=you;bo=boat;bo=diddly'); my %in = map { $_ => [ $q->param($_) ] } $q->param ; dd( \%in ); __END__ { bo => ["boat", "diddly"], ro => ["row", "you"] }

Also there should be no code outside of subs, pass arguments and write more subs like sub DebugCGI in UTF-8

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (1)
As of 2023-06-06 02:30 GMT
Find Nodes?
    Voting Booth?
    How often do you go to conferences?

    Results (26 votes). Check out past polls.