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

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