Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    $mw->Button(-text => 'Exit', -command => sub { exit })->pack();
    
    MainLoop;
    
  2. or download this
    use strict;
    use warnings;
    ...
    $mw->Button(-text => 'Exit', -command => sub { exit })->pack();
    
    MainLoop;