Select Code to Download

sub iterate {
    for my $item ( @_ ){
...
iterate( qw(a b c) );
iterate( 1, 2, 3, 4);
iterate( 0 );

iteration 1
iteration 2
...
iteration 6
iteration 7
iteration 8