# Hash Slice zum rausholen der Werte in der richtigen Reihenfolge
foreach my $addr( sort{ $a->{plz} cmp $b->{plz}  } @$table ){
    my %h = %{$addr};
    printf qq(
        Name:    %s
        Vorname: %s
        Ort:     %s
        PLZ:     %s
    ), @h{qw(name vname ort plz)}; 
}