Select Code to Download

my $grouped = intersector([1..5], [3..7], [2, 6]);
print join(' ', @$_), "\n" for values %$grouped;
# output (in some order):
...
  # now analyse further, or return a result
  return \%grouped;
}