Merge prod version

diff --git a/scripts/cron/stats/pflogsumm-betaD-x.org.pl b/scripts/cron/stats/pflogsumm-betaD-x.org.pl
index de22133..0fc21cc 100755 (executable)
--- a/scripts/cron/stats/pflogsumm-betaD-x.org.pl
+++ b/scripts/cron/stats/pflogsumm-betaD-x.org.pl
@@ -342,6 +342,10 @@ while(<>) {
                push(@{$msgDetail{$qid}}, $addr) if($opts{'e'});
            } elsif($status eq 'deferred') {
                my ($deferredReas) = /, status=deferred \(([^\)]+)/o;
+               if (!defined($deferredReas)) 
+                       {
+                       $deferredReas = "---[0.0.0.0] connect to 0.0.0.0";
+                       }
                unless(defined($opts{'verbMsgDetail'})) {
                    $deferredReas = said_string_trimmer($deferredReas, 65);
                    $deferredReas =~ s/^[0-9]{3} //o;

diff --git a/scripts/cron/stats/pflogsumm-betaN-x.org.pl b/scripts/cron/stats/pflogsumm-betaN-x.org.pl
index 181a857..2dd3d07 100755 (executable)
--- a/scripts/cron/stats/pflogsumm-betaN-x.org.pl
+++ b/scripts/cron/stats/pflogsumm-betaN-x.org.pl
@@ -342,6 +342,10 @@ while(<>) {
                push(@{$msgDetail{$qid}}, $addr) if($opts{'e'});
            } elsif($status eq 'deferred') {
                my ($deferredReas) = /, status=deferred \(([^\)]+)/o;
+               if (!defined($deferredReas)) 
+                       {
+                       $deferredReas = "---[0.0.0.0] connect to 0.0.0.0";
+                       }
                unless(defined($opts{'verbMsgDetail'})) {
                    $deferredReas = said_string_trimmer($deferredReas, 65);
                    $deferredReas =~ s/^[0-9]{3} //o;

diff --git a/scripts/cron/stats/pflogsumm-betaR-x.org.pl b/scripts/cron/stats/pflogsumm-betaR-x.org.pl
index 551bb82..e98a737 100755 (executable)
--- a/scripts/cron/stats/pflogsumm-betaR-x.org.pl
+++ b/scripts/cron/stats/pflogsumm-betaR-x.org.pl
@@ -342,6 +342,10 @@ while(<>) {
                push(@{$msgDetail{$qid}}, $addr) if($opts{'e'});
            } elsif($status eq 'deferred') {
                my ($deferredReas) = /, status=deferred \(([^\)]+)/o;
+               if (!defined($deferredReas)) 
+                       {
+                       $deferredReas = "---[0.0.0.0] connect to 0.0.0.0";
+                       }
                unless(defined($opts{'verbMsgDetail'})) {
                    $deferredReas = said_string_trimmer($deferredReas, 65);
                    $deferredReas =~ s/^[0-9]{3} //o;