$mw->Label(-image=>$mw->Photo(-format=>'gif',-file=>'tranicon.gif'))->pack();