Build a list of Check Box by using the value in an array : Checkbox « GUI « Perl





Build a list of Check Box by using the value in an array

 

#!/usr/local/bin/perl -w
use Tk;
use strict;

my $mw = MainWindow->new(-title => 'My List');
foreach (qw/A B C D/) {
    $mw->Checkbutton(-text => $_)->pack(-side => 'left');
}

$mw->Button(-text => "Purchase")->pack(-side => 'bottom');

MainLoop;

   
  










Related examples in the same category

1.Create CheckBox button
2.Adding Check Box Button to Frame
3.Binding variable to check box
4.Check 'Check Box Button' Selection Value
5.Each check button has its own variable