Select Code to Download

print join ' ', $atob, $btoc, $atoc, "\n";

if (abs $atob > 1  &&  
    abs $btoc > 1  &&  
...
    $matrixflags[$row - 2][$i] = 0;
}
elsif ( ... ) { ... }