my @sorted_zwoelfer = sort{ $all_zwoelfer{$a}->[1][1] <=> $all_zwoelfer{$b}->[1][1] } keys %all_zwoelfer;