>perl -CSD -we"print chr 0x2660" | perl -CSD -we"printf qq{%X\n}, ord <>"
2660