Select Code to Download

#!/bin/perl

...
print_grid($grid);
print "\n";
print Dumper($boxes);

Selected area: 38
.111............
...
          [ 2,12, 2,12 ],
          [10,12,11,14 ]
        ];