Help for this page

Select Code to Download


  1. or download this
    my $button_submit = $lf->Button(
    -text => 'Search',
    -command => \&get_data
)->pack(qw//);
  2. or download this
    my @info;
my $button_submit = $lf->Button(
    -text => 'Search',
    -command => \@info = \&get_data
)->pack(qw//);
  3. or download this
    $varname->configure(-textvariable => 'helloo');
  4. or download this
    Tk::Error: Can't call method "configure" on an undefined value at disp
+atch.pl li
ne 158.
...
 Tk::__ANON__ at C:/Perl/site/lib/Tk.pm line 228
 Tk::Button::butUp at C:/Perl/site/lib/Tk/Button.pm line 111
 (command bound to event)