Help for this page

Select Code to Download

Select or download this

  DB<117> use List::MoreUtils qw/part/;

...

  DB<119> use feature 'state'; part {state $i++ %3} a..h
 => (["a", "d", "g"], ["b", "e", "h"], ["c", "f"])

Select or download this

  DB<139> use feature "state";  part {state $i++/3} a..h
 => (["a", "b", "c"], ["d", "e", "f"], ["g", "h"])