NAME

CTK::FilePid - File::Pid patched interface

VERSION

Version 1.00

$id$

SYNOPSIS

use CTK::FilePid;

my $pidfile = new CTK::FilePid ({
  file => '/some/file.pid',
});

if ( my $num = $pidfile->running ) {
    die "Already running: $num\n";
} else {
    $pidfile->write;

    # ...
    # blah-blah-blah
    # ...
    
    $pidfile->remove;
}

DESCRIPTION

This software manages a pid file for you. It will create a pid file, query the process within to discover if it's still running, and remove the pid file.

See File::Pid for details

AUTHOR

Serz Minus (Lepenkov Sergey) http://serzik.ru <minus@mail333.com>

COPYRIGHT

Copyright (C) 1998-2012 D&D Corporation. All Rights Reserved

LICENSE

This program is free software; you can redistribute it and/or modify it under the same terms and conditions as Perl itself.

This program is distributed under the GNU LGPL v3 (GNU Lesser General Public License version 3).

See LICENSE file