Cyclone3 Skin

TOM::lock

From Cyclone3 Wiki

Allows you to create indenpendent locks for running processes between system processes.

For example, when you are datamining data into database, statistic outputs would be inconsistent, therefore should this process be locked.

Examples

my $lock=new TOM::lock("datamining") || die "this lock is in use";
...
$lock->close();

get_pid()

Returns process ID number of process which is using the specified lock.

Syntax

my $pid=TOM::lock::get_pid("datamining");

get_pidfile()

Returns filename of this lock, containing actual process ID.

Syntax

my $pidfile=TOM::lock::get_pidfile("datamining");