Janus::Ctrl - Controls maintenance via a SQLite database
use Janus::Ctrl; my $ctrl = Janus::Ctrl->new( $name => '/sqlite/file' ); $ctrl->clear(); $ctrl->pause( 'foo.alpha', 'blah' ); $ctrl->resume(); $ctrl->exclude( 'foobar', 'blah' ); sleep 3 if $ctrl->stuck();
A SQLITE db has a watcher table of four columns:
name : name of maintenance ctrl : 'error', 'pause' or 'exclude' node : stage name or node name info : additional information, if any
Insert a record that cause stuck.
Return records that cause @stage to be stuck. Return all records if @stage is not defined.
Clear records that cause @stage to be stuck. Clear all records if @stage is not defined.
Exclude $node with a $info.
Return ARRAY ref of excluded nodes.
Return ARRAY ref of *.
clear all records.
A pseudo-stage that applies to all stages.
To install pantheon, copy and paste the appropriate command in to your terminal.
cpanm
cpanm pantheon
CPAN shell
perl -MCPAN -e shell install pantheon
For more information on module installation, please visit the detailed CPAN module installation guide.