-Index: pflogsumm.pl
+Index: pflogsumm/pflogsumm.pl
===================================================================
---- pflogsumm.pl.orig
-+++ pflogsumm.pl
+--- pflogsumm.orig/pflogsumm.pl
++++ pflogsumm/pflogsumm.pl
@@ -713,7 +713,7 @@ while(<>) {
\${$msgsPerDay{$revMsgDateStr}}[4]);
} elsif($cmd eq 'master') {
+ unless((($domain, $ipAddr) = /^([^\[]*)\[((?:\d{1,3}\.){3}\d{1,3})\]/) == 2||
+ (($domain, $ipAddr) = /^([^\/]*)\/([0-9a-f.:]+)/i) == 2) {
# more exhaustive method
- ($domain, $ipAddr) = /^([^\[\(\/]+)[\[\(\/]([^\]\)]+)[\]\)]?:?\s*$/;
+- ($domain, $ipAddr) = /^([^\[\(\/]+)[\[\(\/]([^\]\)]+)[\]\)]?:?\s*$/;
++ ($domain, $ipAddr) = /^([^\[\(\/]*)[\[\(\/]([^\]\)]+)[\]\)]:?\d*$/;
}
# "mach.host.dom"/"mach.host.do.co" to "host.dom"/"host.do.co"