UTF8 => ISO - #80787 (Allgemeines zu Perl)

Maluku

2004-03-09 19:41

User since
2003-10-02
27 Artikel
BenutzerIn

http://www.perldoc.com/perl5.8.0/lib/utf8.html
utf8::encode($string)
utf8::decode($string)
Encode::encode_utf8()
Encode::decode_utf8()\n\n

Code (perl): ()

&#36_='';
s%%`^.*`s;.*;uhtnmo;;a>lha~a>inu~a>fmk~a>rou~a>duM~a>btl~s;&&&&&&;!d1!l2!b3!i4!f5!r6q(?);e;Z`
`}a>&&&`sub# "1#{#"_=shift#;s^"2^"3#^;``;~`return #"_#}``^!&&`"1(#""2)#\.`Z%;
s~Z~print~g;s/#/\\/g;s/`(.)(.+?)`(.+?)`/s&#36{1}&#36{2}&#36{1}&#36{3}&#36{1}g\;/g;s;&;(.);g;y^"^&#36^;
print;