%hash;
 $hash{'normal'} = "Some value" ;
 $hash{'list1} = [] ;

##</code><code>##

push @{ $hash{'list1'} }, {keys=>values} ;

##</code><code>##

$foo = $hash{'list1}[0]{'key'} ;

##</code><code>##

$widget{'foo'}=$mw->Entry(-textvariable => \$hash{'normal'});

# and for dynamicly created, repeating elements
$widget{'bars'}[0]{'bar1'} = $mw->Entry( -textvariable => \$hash{'bars'}[0]{'bar1'} ) ;

##</code><code>##

#for storing past data (think 'back button')
push @past_data, \%hash ;