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

[Anonymous Monk]

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