--- File-Pid-1.01/lib/File/Pid.pm.orig 2005-01-11 14:09:54.000000000 +0100
+++ File-Pid-1.01/lib/File/Pid.pm 2011-02-04 18:28:50.000000000 +0100
@@ -119,7 +119,7 @@
sub running {
my $self = shift;
- my $pid = $self->_get_pid_from_file;
+ my $pid = $self->_get_pid_from_file or return undef;
return kill(0, $pid)
? $pid