perl - 1=1 2=2 1=3 1=5 use CGI; use Data::Dumper; local $Data::Dumper::Useqq=1; local $Data::Dumper::Indent=1; print Dumper( scalar CGI->new->Vars ),$/; __END__ $VAR1 = { 1 => "1\0003\0005", 2 => 2 };