Select Code to Download

package example;

...
                    
    MainLoop;
}

    my $image = $mw->Photo(
        -file => "saraLogo2.gif");
...
            ->pack(
                -side=> "left", 
                -anchor => 'n');