D:\>perl -MCGI -le"print CGI->new->Dump" a=b%00c d=e a= a=Q
D:\>perl -MCGI -le"print CGI->new->self_url" "a=b%00c&d=e&a=&a=Q"
http://localhost?a=b%00c;a=;a=Q;d=e
D:\>perl -MCGI -MData::Dumper -le"print Data::Dumper->new([ CGI->new ])->Useqq(1)->Indent(1)->Dump" a=b%00c d=e a= a=Q
$VAR1 = bless( {
".parameters" => [
"a",
"d"
],
"use_tempfile" => 1,
".charset" => "ISO-8859-1",
".fieldnames" => {},
"param" => {
"a" => [
"b\0c",
"",
"Q"
],
"d" => [
"e"
]
},
"escape" => 1
}, 'CGI' );
D:\>
D:\>
D:\>