my $icon = '/* XPM */ static char * icon_xpm[] = { "16 16 108 2", "c None", "!c black", "#c white", "$c #FFD188", "%c #FFBF62", "&c #FFF6EB", "'."'".'c #FFEED4", "(c #FF9E1C", ")c #FFA216", "*c #FFFDFB", "+c #FFB445", ",c #FF9906", "-c #FFA325", ".c #FFD9A3", "0c #FFF6E9", "1c #FF9500", "2c #FF9000", "3c #FF9400", "4c #FFEED5", "5c #FFCC81", "6c #FF9800", "7c #FF9100", "8c #FF8D00", "9c #FFB54F", ":c #FFECD0", ";c #FFA31F", "c #FFDAA4", "?c #FFE2B9", "@c #FF9B07", "Ac #FF9700", "Bc #FF9F14", "Cc #FFBD5A", "Dc #FF9C11", "Ec #FF8C00", "Fc #FFBE5F", "Gc #FF9901", "Hc #FF9900", "Ic #FF9600", "Jc #FF8B00", "Kc #FFC86B", "Lc #FFE7DA", "Mc #FFD9C5", "Nc #FFE3D4", "Oc #FFA92A", "Pc #FF9200", "Qc #FFB33F", "Rc #FFD18F", "Sc #FFBB93", "Tc #FF7829", "Uc #FF5F00", "Vc #FF5A00", "Wc #FF5B00", "Xc #FF8432", "Yc #FFE6D6", "Zc #FFB03B", "[c #FF9805", "]c #FFAD3C", "^c #FFD59E", "_c #FFB082", "`c #FF772F", "ac #FF5700", "bc #FF5C00", "cc #FF6300", "dc #FF6400", "ec #FF944E", "fc #FFF1E0", "gc #FFECD4", "hc #FFF5E9", "ic #FF9658", "jc #FF4C00", "kc #FF6803", "lc #FF6600", "mc #FF6601", "nc #FFB889", "oc #FF9E5D", "pc #FF5400", "qc #FF6B12", "rc #FF9F5F", "sc #FF7118", "tc #FF5500", "uc #FF6500", "vc #FF6B09", "wc #FFE6D7", "xc #FFC39B", "yc #FF5600", "zc #FF5D00", "{c #FF741B", "|c #FFE8D8", "}c #FF9556", "~c #FF5800", " !c #FF6200", "!!c #FFBF94", "#!c #FFE3D0", "$!c #FF6A0C", "%!c #FFF6F1", "&!c #FFCCAD", "'."'".'!c #FF7D30", "(!c #FF6C11", ")!c #FFA66B", "*!c #FFFCFA", "+!c #FF7010", ",!c #FF792A", "-!c #FFF0E5", ".!c #FFF9F6", "0!c #FFAD78", "1!c #FFD0AC", " ", "# # # # # # # $ % # # # # # # # ", "# & # # # # '."'".' ( ) * # # # # # # ", "+ , - . # 0 1 2 3 4 # # # # # # ", "5 6 7 8 9 :; < = > # # # # # # ", "? @ A 6 = B C D E % # # # # # # ", "F G 6 H H 1 I 6 J K # L M N # # ", "O P A A I 2 < Q R S T U V W X Y ", ": Z 3 3 [ ] ^ _ ` a b c d c W e ", "# # f g h # i j k d U l l d m n ", "# # # # # # o p q r s t u c v w ", "# # # # # # x y z { | } y ~ !!!", "# # # # # # #!z a $!%!# &!'."'".'!(!)!", "# # # # # # *!+!,!-!# # # # .!# ", "# # # # # # # 0!1!# # # # # # # ", " "};'; my $bitmap = $config{MainWindow}->Pixmap(-data=> $icon); $config{MainWindow}->Icon(-image => $bitmap, -width=>16, -height=>16);