use Algorithm::Combinatorics qw(:all);
  my $iter = combinations_with_repetition(\@{['a'..'z']}, 8);