Help for this page
>perl -wMstrict -lE "use List::MoreUtils qw(part); ... '1 3 7 9 11 13 17 19' '5 10 15' '2 4 6 8 12 14 16 18'
>perl -wMstrict -lE "BEGIN { ... '1 3 7 9 11 13 17 19' '5 10 15' '2 4 6 8 12 14 16 18'