Select Code to Download

#! perl -slw
use strict;
...
B C D E
C D
C D E

#! perl -slw
use strict;
...
C
C D
C D E

sub adjSets2{
    my $min = shift;
...
    }
    return @rv;
}