Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl
use Proc::PID::File;
die "Already running!" if Proc::PID::File->running();
  2. or download this
    pid "/var/run/proc_pid.pl.pid" already locked: Bad file descriptor
  3. or download this
    #!/usr/bin/env perl
use Proc::PID::File;
die "Already running!" if Proc::PID::File->running(dir=>"/my/home/dir"
+);