Select Code to Download

foreach my $thing(@things){
    process($thing);
}

for(my $i=0;$i < scalar(@things); $i += 3){
    process($things[$i]);
}