Monks,
I have been banging my head against a wall on this issue for the last few hours and cannot make sense of it ...
A html form gets submitted with a non-standard character (e.g. €) in it's escaped format €
When the form is POSTed, it arrives on STDIN as %E2%82%AC
This translates to € when it goes thro' my (bog- standard, Perl-101) POSTParser
my (%searchField, $buffer, $pair, @pairs); read(STDIN, $buffer, $ENV{ 'CONTENT_LENGTH'}); @pairs = split(/&/, $buffer); foreach $pair (@pairs){ my ($name, $value) = split(/=/, $pair); $value =~ tr/+/ /; $value =~ s/%([a-fA-f0-9][a-fA-f0-9])/pack("C", hex($1))/eg; $name =~ tr/+/ /; $name =~ s/%([a-fA-f0-9][a-fA-f0-9])/pack("C", hex($1))/eg; $searchField{ $name } = $value; } return %searchField;
What can I do to deal effectively with this and other similar characters (á,é,í,ó,ú, etc)?
In reply to Encode/Decode Problem by macPerl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |