Re^3: CPAN module to return successive combinations of n things taken k at a time

[ibm1620]

For the record:

#!/usr/bin/env perl
use strict;
use warnings;
use 5.010;

use Algorithm::Combinatorics qw(combinations);

my @data = qw(a b c d e);

# scalar context gives an iterator
my $iter = combinations(\@data, 3);
while (my $p = $iter->next) {
    say (join '', @$p);
}

Produces:

abc
abd
abe
acd
ace
ade
bcd
bce
bde
cde

As required.