Select Code to Download

#!/usr/bin/perl

...
die "Already running!" if Proc::PID::File->running;

# rest of script follows