macPerl has asked for the wisdom of the Perl Monks concerning the following question:
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)?
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Encode/Decode Problem
by JediWizard (Deacon) on Mar 04, 2005 at 16:44 UTC | |
|
Re: Encode/Decode Problem
by Joost (Canon) on Mar 04, 2005 at 16:44 UTC | |
by macPerl (Beadle) on Mar 04, 2005 at 17:11 UTC |