Help for this page

Select Code to Download


  1. or download this
    # Tcl inclusion for GUI finished here; you can work with widgets here 
+like:
my $lab = $mw->interp->widget('.status');
$lab->configure(-text=>'new text here...');
  2. or download this
    my $mw = $int->widget( ... ,'MainWindow');
$mw->Button(-text => 'freedom' )->pack;