Select Code to Download

    until (flock FH, LOCK_EX) {
        sleep 1;
        die "Can't get exclusive lock $!\n" if $tries++ > $timeout
    }