Help for this page

Select Code to Download


  1. or download this
      sub Populate
    {
      ...
    }
  2. or download this
      my $entry = $frame -> Entry(
                               -textvariable => $tv, # NOTE
                             ) -> pack(-fill => 'x');
  3. or download this
      GUIask (
           -textvariable => \$input,
         )
  4. or download this
      sub Populate
              {

              }
  5. or download this
      my $label = $frame -> Label (
                                -fg => 'blue',
                                -font => 30
                              ) -> pack(-fill => 'x'  );
  6. or download this
      Entry(
         -textvariable => $tv, 
       ) -> pack(-fill => 'x');