Select Code to Download

   for (my $array_index_counter = 0;
           $array_index_counter < @array_of_some_sorts;
           $array_index_counter ++) { ... }

 
    open my $fh => $file or die "Whatever: $!";
    flock $fh => LOCK_SH or die "Whatever: $!";
...
        ....;     
    }
    close $fh or die "Whatever: $!";