my $mw = MainWindow->new;
    my $photo = $mw->Photo( "photo"
                            -format => 'jpeg', 
                            -file   => 'test.jpg' );
    my $button = $mw->Button(-image => "photo")->pack();
    MainLoop;