- or download this
sub maximize_rows {
my @array = @_;
...
7 = 6 7 1 8
8 = 4 5 2 3
9 = 3 5 1 7
- or download this
@array = qw(1 1 1 2 3 4);
...
Unused 1: 1 4
Unused 2: 3 4
Unused 3: 2 4
- or download this
sub get_pairs {
my %hash = ();
...
Unused 3: 1 4
next
1 = 1 4 2 3