http://qs1969.pair.com?node_id=1099727


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