Proc::PID::File - a module to manage process id files
use Proc::PID::File; $pf = Proc::PID::File->new(); die "Already running!" if $pf->alive();
This Perl module is useful for writers of daemons and other processes that need to tell whether they are already running. The module manages *nix-style pidfiles, which are files that store a process identifier, and provides a simple interface for determining whether the program being run is already alive. A programmer can thus avoid running multiple instances of a daemon.
The module provides both an object-oriented interface, as well as a regular procedural function set.
The following methods are provided:
This method is used to create an instance of the module. It automatically calls the ->file() method described below and receives the same paramters. For a listing of valid keys in this has please refer to the aforementioned method documentation below.
In addition to the above, the following constitute valid keys:
Turns debugging output on.
Use this method to set the path of the pidfile. The method receives an optional hash (or alternatively a hash reference) of options, which includes those listed below, from which it makes a path of the format: $dir/$name.pid.
Returns true when the calling process is already running. Please note that this call must be made *after* daemonisation i.e. subsequent to the call to fork().
Returns the process id currently stored in the file set. If unable to open the file for read, the method die()s with an error message.
Causes for the current process id to be written to the set file. The process die()s upon failure to write to the file.
This method is used to delete the pidfile and is automatically called by DESTROY method. It should thus be unnecessary to call it directly.
The module can also export its functionality into the caller's namespace. The functions exported generally correspond to those in the OO interface but follow the naming format: pid_file_<name>.
pid_file_<name>
As an exception, instead of calling ->new() the user will need to call pid_file_set before making any other calls.
- exempli gratia -
use Proc::PID::File qw(:all); pid_file_set( dir => "/var/run", name => "mydaemon" ); die "Already running!" if pid_file_alive();
Erick Calder <ecalder@cpan.org>
1k thx to Steven Haryanto <steven@haryan.to> on whose original package (Proc::RID_File) this work is based.
Copyright (C) 2000-2002, All rights reserved.
This module is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
$Log: File.pm,v $ Revision 1.2 2002/09/20 06:38:45 ekkis - ripped out the procedure interface, concentrating on oo - added modified PODs
4 POD Errors
The following errors were encountered while parsing the POD:
'=item' outside of any '=over'
You forgot a '=back' before '=head2'
To install Proc::PID::File, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Proc::PID::File
CPAN shell
perl -MCPAN -e shell install Proc::PID::File
For more information on module installation, please visit the detailed CPAN module installation guide.