NAME

servicelock - Interface to App::OverWatch DB locks

VERSION

version 0.1

SYNOPSIS

  servicelock [OPTIONS] COMMAND

  Commands:

    --check
    --create_lock
    --create_table
    --force_unlock
    --list
    --lock
    --print
    --unlock
    --update

  Options:

    --system
    --worker
    --text
    --expiry
    --help
    --verbose

DESCRIPTION

servicelock is used to create and manipulate locks in a backend database. It provides a simple example interface to the Perl App::OverWatch::ServiceLock module.

EXAMPLE

Create the ServiceLock table 'servicelocks':

  # servicelock --create_table

Create a lock named 'global':

  # servicelock --create_lock --system global

Check whether 'global' is locked (flagged by exit status):

  # servicelock --check --system global

Attempt to lock the 'global' lock:

  # servicelock --lock --system global --worker myworkerid --text 'testing lock'

  # servicelock --lock --system global --worker myworkerid --text 'testing lock' --expiry 60

Unlock:

  # servicelock --unlock --system global --worker myworkerid

Force an unlock

  # servicelock --force_unlock --system global

Print details about a lock:

  # servicelock --print --system global

List all available locks:

  # servicelock --list

SEE ALSO

notify, eventlog

AUTHOR

Chris Hughes <chrisjh@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by Chris Hughes.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

cpanm App::OverWatch

perl -MCPAN -e shell
install App::OverWatch