my %hash = ();
$hash{a} = 20;
$hash{a} = 30; # ueberschreibt 20
print $hash{$a}