t/50-cgi: encode special chars in file names

[perl/plp/.git] / t / 50-cgi / 61-%25post+set.plp

<:
%post = (Foo => 'ok');
print join "\n", @post{'Foo', 'foo', '@Foo'};
print scalar keys %post;