Help for this page

Select Code to Download


  1. or download this
    $mw->Button (
  -command => [\&print_entries, $user_x->get(), $original_y],
);
  2. or download this
    my $command_sub;
{
...
$mw->Button (
  -command => $command_sub,
);
  3. or download this
      -command => sub {
    print_entries(
...
      $original_y,
    );
  },