stale PID file detection -- previous patch cleanup and supress uninit warning

Author: scottwalters

sbin/spectre.pl

@@ -114,10 +114,9 @@ BEGIN
         die "Spectre is already running.\n";
     }
     elsif (-e $pidFileName){
-        # oh, ffs ... die "pidFile $pidFileName already exists\n";
         open my $pidFile, '<', $pidFileName or die "$pidFileName: $!";
         (my $pid) = readline $pidFile;
-        chomp $pid;
+        chomp $pid if defined $pid;
         if(defined $pid and $pid =~ m/^(\d+)$/) {
             if(kill 0, $1) {
                 die "$0: already running as PID $1";