Help for this page

Select Code to Download


  1. or download this
    $ perl -CSD  -MTk -e " tkinit()->Label(-text, qq/\x{1F642}/ )->pack; M
+ainLoop; "
UCS-2LE:code point "\x{1f642}" too high at .../site/lib/Tk/Widget.pm l
+ine 205.
 at -e line 1.