Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Charnames japh

by ambrus (Abbot)
on Apr 14, 2005 at 16:25 UTC ( #447959=obfuscated: print w/replies, xml ) Need Help??

use charnames ":full"; BEGIN{ my $s = $^H{charnames}; $^H{charnames} = + sub { $_[0] =~ /^\$(.*)/s ? &$s($$1) : &$s; } } BEGIN { $name = "LAT +IN SMALL LETTER P"; } print "j\N{LATIN SMALL LETTER A}\N{$name}h\n"

Update: short version:

use charnames ":short"; BEGIN{ my $s = $^H{charnames}; $^H{charnames} += sub { $_[0] =~ /^\$(.*)/s ? &$s($$1) : &$s; } } BEGIN { $name = "la +tin:p"; } print "j\N{latin:a}\N{$name}h\n"

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://447959]
Approved by ghenry
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (5)
As of 2019-04-24 11:51 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I am most likely to install a new module from CPAN if:
















    Results (121 votes). Check out past polls.

    Notices?