Select Code to Download

  foreach my $item (@list) {
    something($item);
  }

  for (my $i = 0; $i < @list; $i++) {
    something($list[$i]);
  }