Select Code to Download

foreach my $foo (@bar) {
    do_something($foo);
}

    for $blah (@blah) {
        # ...
        # ...
...
    # ...
    # ...
}