Help for this page

Select Code to Download


  1. or download this
    
    foreach my $button ( @buttons ) {
    ...
        print "button\n";
    }
    
  2. or download this
    -command => sub { print_button_label( $button ) },