Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
</center>
</body>
EndOfHTML
  2. or download this
    #!/usr/bin/perl
use Tk;
...
  $text = 'Done!';
  $mw->update;
}