Select Code to Download

use strict;
use warnings;
use Data::Dumper;
...
sub make_puzzle{
    return map{[split //, $_]} @_;
}