Destroy a window in button action

   

use Tk;

my $main = MainWindow->new;

$main->Button(-text => 'End',
    -command => [$main => 'destroy']
)->pack;

MainLoop;

1.	Create empty window
2.	tkphone - Phone another X Display and have a line-mode conversation
3.	Tk Configuration Options
4.	Create two windows
5.	Setting Border Width for Frame
6.	Advanced Hello World program using two MainWindows
7.	Adding components to the Client Area of a Window with Menu Bar

Destroy a window in button action : MainWindow « GUI « Perl