Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: Perl script to transform XX-encoding to UTF-8

by Adrade (Pilgrim)
on Jun 23, 2005 at 23:27 UTC ( [id://469563]=note: print w/replies, xml ) Need Help??


in reply to Perl script to transform XX-encoding to UTF-8

I'm perhaps not totally sure what you're going for, but I believe that what you're doing can also be accomplished with the following. However, well done on the port!
$string =~ s/%(..)/pack("c",hex($1))/ge;

[download]
  -Adam

Update: The CGI module seems to do this transformation correctly. Since it appears you're writing a CGI script, perhaps that module would be useful.

--
Impossible! The Remonster can only be killed by stabbing him in the heart with the ancient bone saber of Zumakalis!

Replies are listed 'Best First'.
Re^2: Perl script to transform XX-encoding to UTF-8
by emav (Pilgrim) on Jun 24, 2005 at 06:04 UTC
    I'm aware of this regex but it doesn't work with extended unicode character sets. At least, it didn't work with the accented ancient Greek characters (1F00-1FFF) that I am interested in.
[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://469563]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others avoiding work at the Monastery: (10)
As of 2024-04-23 08:22 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found