Can’t kill a non-numeric process ID at /usr/local/share/perl/5.14.2/File/Pid.pm line 124

update the File/Pid.pm as per https://rt.cpan.org/Public/Bug/Display.html?id=18960

pico +122 /usr/local/share/perl/5.14.2/File/Pid.pm

add ‘or return undef’ before the semicolon on the line with ‘my $pid = $self->_get_pid_from_file’

sub running {
    my $self = shift;
    my $pid  = $self->_get_pid_from_file or return undef;

    return   kill(0, $pid)
           ? $pid
           : undef;
}