Hello yedukondalu,

Tk programs often use pixmaps rather than bitmaps for their icon images, because pixmaps provide more than two colors and are plaintext.
You can review my best Tk program Tk Tartaglia's triangle fun - Pascal's triangle fun where i use inline plaintext icon. Below the relevant part of the program.
See also Tk::Pixmap

my $mw = MainWindow->new ();
    $mw->Icon(-image => $mw->Pixmap(-data => &tart_icon));

[...]

sub tart_icon {
    return <<EOI
/* XPM */
static char * Icon_xpm[] = {
"32 32 4 1",
"     c #000000000000",
"g    c #00FF00",
"X    c #FF0000",
"D    c #FFFF00",

# 32 lines more with the inline pixmap
[...]
[download]

HtH
L*