From 44b2544ecbca17b3903dd56bf499b47063374a13 Mon Sep 17 00:00:00 2001 From: Todd Lyons Date: Sat, 5 Oct 2013 08:31:49 -0700 Subject: [PATCH] Fix exiqsumm output for single queue item. Patch from Richard Hall, with one minor addition to prevent uninitialized value error during output. --- src/src/exiqsumm.src | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/src/exiqsumm.src b/src/src/exiqsumm.src index 1a200d608..fc5ad26bb 100644 --- a/src/src/exiqsumm.src +++ b/src/src/exiqsumm.src @@ -139,7 +139,7 @@ elsif (/^\s+[^@]*\@([\w\.\-]+|\[(\d+\.){3}\d+\])/o) print "\nCount Volume Oldest Newest Domain"; print "\n----- ------ ------ ------ ------\n\n"; -my ($count, $volume, $max_age, $min_age) = (0, 0, "0m", "0000d"); +my ($count, $volume, $max_age, $min_age) = (0, 0, "0m", undef); foreach $id (sort { @@ -153,10 +153,12 @@ foreach $id (sort $queue{$id}, &print_volume_rounded($q_size{$id}), $q_oldest{$id}, $q_recent{$id}, $id); $max_age = $q_oldest{$id} if &older($q_oldest{$id}, $max_age) > 0; - $min_age = $q_recent{$id} if &older($min_age, $q_recent{$id}) > 0; + $min_age = $q_recent{$id} + if (!defined $min_age || &older($min_age, $q_recent{$id}) > 0); $volume += $q_size{$id}; $count += $queue{$id}; } + $min_age ||= "0000d"; printf("---------------------------------------------------------------\n"); printf("%5d %.6s %6s %6s %.80s\n", $count, &print_volume_rounded($volume), $max_age, $min_age, "TOTAL"); -- 2.25.1