Select Code to Download

use strict;
use Data::Dumper;
...
   }
   print scalar @array, " solutions found\n";
}

$copy = [@$board];

$copy = [ map { [@$_] } @$board];