Select Code to Download

>perl -MHTML::Entities -le"$foo=decode_entities('♥'); print for
+ vec($foo,0,8), ord($foo)"
226
9829