Select Code to Download

  foreach my $j ($col_start .. $#column) {
    $n[$j] //= 1; # Choose whatever suitable value you want here - it 
+could even be an expression
    $x[$n[$j]][$j] = $column[$j];
    # ... etc.