Select Code to Download

    for( my $n = 0; $n < scalar @loop_keys; ++$n ) {
...
        }
    }

    for my $n ( 0 .. @loop_keys - 1 ) {
...
        }
    }