my @messreihen = ([1,3,2,5,4], [154,87,35]);
for my $messreihe (@messreihen) {
    say join ",", @$messreihe;
}