Select Code to Download

# make sure /tmp/unlocked_[ab] exist first

...
    print "Done with Drive B.\n";
  } qw(/tmp/unlocked_b /tmp/locked_b);
}

# critical region - only one code BLOCK runs at any one time
sub lock_section (&@) {
...
        return \@ret;
    }
}