Help for this page

Select Code to Download


  1. or download this
    %hash;
 $hash{'normal'} = "Some value" ;
 $hash{'list1} = [] ;
  2. or download this
    push @{ $hash{'list1'} }, {keys=>values} ;
  3. or download this
    $foo = $hash{'list1}[0]{'key'} ;
  4. or download this
    $widget{'foo'}=$mw->Entry(-textvariable => \$hash{'normal'});

# and for dynamicly created, repeating elements
$widget{'bars'}[0]{'bar1'} = $mw->Entry( -textvariable => \$hash{'bars
+'}[0]{'bar1'} ) ;
  5. or download this
    #for storing past data (think 'back button')
push @past_data, \%hash ;