Select Code to Download

#! perl -slw
use strict;
...
13 7 8 5 13 10 13 13 13 5
14 15 5 7 14 7 13 14 6 5
14 15 15 8 13 6 7 7 5 10

sub gen3 {
    my $constraints = shift;
...
    }
    return @rands;
}