Re: question on encoding

You need something like this:

#!/usr/bin/perl

use warnings;
use strict;
use Encode;

my $uri = '%C3%A9nfasis';
$uri =~ s/%([0-9A-Fa-f]{2})/chr(hex($1))/eg;
$uri = decode_utf8($uri);
$uri = encode("iso-8859-1", $uri);
print $uri;
[download]

It prints énfasis.

s;;Just-me-not-h-Ni-m-P-Ni-lm-I-ar-O-Ni;;tr?IerONim-?HAcker ?d;print

Comment on Re: question on encoding Select or Download Code

In Section Seekers of Perl Wisdom