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