Help for this page

Select Code to Download


  1. or download this
    use strict;
use Tk;
...
$win->Label(-image=>$image)->pack;

MainLoop;
  2. or download this
    
use strict;
...
$win->Label(-image=>$image)->pack;

MainLoop;
  3. or download this
    couldn't recognize image data at C:/Perl/site/lib/Tk/Image.pm line 21.