#### höchsten Wert finden ####
$Hochw = 0;
for my $i (0..$x) {
    for my $j (0..$y) {
        $Hochw = $LM[$i][$j] if $Hochw < $LM[$i][$j];
    }
}