for my $i ( 1 .. $#Values ){        #Vor- & Schlusssatz abschneiden
    my %hash;

    my @valueX = split(/\|/, $Values[$i]);

    for my $j ( 0 .. $#Keys){
        $hash{ $Keys[$j] } = $valueX[$j];
    }

    push @AoH, \%hash;
}