Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...

-command => [\&mybuttons, $i]
  2. or download this
    #!/usr/bin/perl -w
use Tk;
...
MainLoop();