Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
    die "No solution\n" if !@$solutions;
    print("$_\n") for @$solutions;
}

Select or download this

$ perl all.pl AAAAADDDDDEFFGMMSSTVVVVV
AAAA;ADEF;DDDD;FGMS;MSTV;VVVV
...
AAAA;DDDD;EEEE;FFFF;GGGG
AAAA;DEFG
ADEF;GGGG