On 5/14/07, Jen mlists <[EMAIL PROTECTED]> wrote:
2007/5/14, Chas Owens <[EMAIL PROTECTED]>:> #!/usr/bin/perl > use strict; > use warnings; > > use strict; > use Encode; > use URI::Escape; > my $str = 'Perl%EF%BF%BD%EF%BF%BD%EF%BF%BD%EF%BF%BD%EF%BF%BD%EF%BF%BD%EF%BF%BD%EF%BF%BD%28%EF%BF%BD%EF%BF%BD%EF%BF%BD%C4%B0%EF%BF%BD%29.pdf'; > > my $tr = encode("utf8",decode("gb2312",uri_unescape($str))); > print "$tr\n"; > Sorry Chas this would work still. Anyway thanks.I'll try other ways.
What exactly do you want as output and what is your environment (mine is Ubuntu 7.04 using the default locale). -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
