Help for this page
c:\@Work\Perl>perl -wMstrict -le "sub Iterator (&) { return $_[0]; } ... " (a bee) (a c) (a d) (bee c) (bee d) (c d) (a bee) (a c) (a d) (bee c) (bee d) (c d)