X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FDaemonize%2FPid.pm;h=1a92ff83b69f1671b2e8421266ce19a6588618d8;hb=568a7a763acd951378a56fbe67db98463eed88b4;hp=7df80704d584f438fc4508d1bc63a58345ca3ff0;hpb=eaf252a6da8a9b8b1e70c2d491302872df5f71eb;p=gitmo%2FMooseX-Daemonize.git diff --git a/lib/MooseX/Daemonize/Pid.pm b/lib/MooseX/Daemonize/Pid.pm index 7df8070..1a92ff8 100644 --- a/lib/MooseX/Daemonize/Pid.pm +++ b/lib/MooseX/Daemonize/Pid.pm @@ -1,17 +1,14 @@ +use strict; +use warnings; package MooseX::Daemonize::Pid; -use strict; # because Kwalitee is pedantic + use Moose; use Moose::Util::TypeConstraints; -use overload '""' => sub { (shift)->pid }, - '+0' => sub { (shift)->pid }, - fallback => 1; - -coerce 'MooseX::Daemonize::Pid' - => from 'Int' +coerce 'MooseX::Daemonize::Pid' + => from 'Int' => via { MooseX::Daemonize::Pid->new( pid => $_ ) }; -our $VERSION = '0.01'; has 'pid' => ( is => 'rw', @@ -33,10 +30,10 @@ __END__ =head1 NAME MooseX::Daemonize::Pid - PID management for MooseX::Daemonize - + =head1 DESCRIPTION -This is a very basic Pid management object, it doesn't do all that +This is a very basic Pid management object, it doesn't do all that much, and mostly just serves as a base class for L. =head1 ATTRIBUTES @@ -47,7 +44,7 @@ much, and mostly just serves as a base class for L =back -=head1 METHODS +=head1 METHODS =over 4 @@ -58,7 +55,7 @@ that the parent process does not have a bad value stored in it. =item B -This is a predicate method to tell you if your I attribute has +This is a predicate method to tell you if your I attribute has been initialized yet. =item B @@ -89,11 +86,11 @@ L. =head1 AUTHOR -Stevan Little C<< >> +Stevan Little C<< >> =head1 LICENCE AND COPYRIGHT -Copyright (c) 2007, Chris Prather C<< >>. All rights +Copyright (c) 2007-2011, Chris Prather C<< >>. All rights reserved. This module is free software; you can redistribute it and/or @@ -122,4 +119,4 @@ FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. -=cut \ No newline at end of file +=cut