foreach my $index (@sort_keys_satzliste)
{   @{$liste{$index}} = <irgendwelchedaten>; }