From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

NAME

Proc::tored::Flag - Ties a runtime flag to the existence of a touch file

VERSION

version 0.20

SYNOPSIS

my $fnord = Proc::tored::Flag->new(touch_file_path => '/my/service/path');
$fnord->set; # touch file created if not already there
$fnord->is_set; # true
$fnord->unset; # touch file removed if it exists
$fnord->is_set; # false
if ($fnord->is_set) {
warn "forgot what to do";
exit 1;
}

AUTHOR

Jeff Ober <sysread@fastmail.fm>

COPYRIGHT AND LICENSE

This software is copyright (c) 2017 by Jeff Ober.

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