Adding button (control) to a window : Button « GUI « Perl

Adding button (control) to a window

   



use Tk;



my $main = MainWindow->new;



$main->Button(-text => 'End',

    -command => [$main => 'destroy']

)->pack;



MainLoop;

Related examples in the same category

1.	Your first Perl/Tk program
2.	Pass subroutine to button and get called when clicking
3.	Pass value to a subroutine in button action
4.	Set Button action command
5.	Load and save text file
6.	Link a subroutine with a button action

All other trademarks are property of their respective owners.