#Zuweisung
$adressen{'Peter'} = [@daten];

#Ausgabe, array im hash druchlaufen
for(@{$adressen{'Peter'}}){
   print "$_\n";
}

print Dumper(\%adressen);
$adressen{Peter}->[2] = 'irgendwas anderes';
print Dumper(\%adressen);