my $ROW1=$GUI->Frame(-relief=>'flat',
                     -borderwidth=>0,
                     -background=>'#c2d297'
                     ->pack(-side=>'top', -fill=>'x');

    my $photo = $ROW1->Photo(-file=>"numbers/1.bmp");

    my $photo_canvas = $ROW1->Canvas(-width=>29,                                                      
                                     -height=>32,  
                                     -background=>'#c2d297', 
                                     -borderwidth=>0)
                                     ->pack(-side=>'left');
			
    $photo_canvas->createImage(16, 18, -image=>$photo);