my %hash = (
'Top' => 29.99,
'Jeans' => 99.99,
'Hose' => 49.99,
'Sandaletten' => 19.99
);
print $_[0],' : ',$_[1],"\n" for each %hash;
#oder
print "$_ : ",$hash{$_},"\n" for keys %hash;