[Resmon-devel] [resmon commit] r361 - branches/resmon2/lib/Core/Pf

svn-commit at lists.omniti.com svn-commit at lists.omniti.com
Thu May 6 16:32:27 EDT 2010


Author: jdixon
Date: 2010-05-06 16:32:27 -0400 (Thu, 06 May 2010)
New Revision: 361

Modified:
   branches/resmon2/lib/Core/Pf/Queues.pm
Log:
oops

Modified: branches/resmon2/lib/Core/Pf/Queues.pm
===================================================================
--- branches/resmon2/lib/Core/Pf/Queues.pm	2010-05-06 20:21:17 UTC (rev 360)
+++ branches/resmon2/lib/Core/Pf/Queues.pm	2010-05-06 20:32:27 UTC (rev 361)
@@ -67,10 +67,10 @@
         foreach (split(/queue\s+/, $output)) {
             next unless /\w+/;
             if (/(\S+)\s+.*\n\s+\[\s+pkts\:\s+(\d+)\s+bytes\:\s+(\d+)\s+dropped\s+pkts\:\s+(\d+)\s+bytes\:\s+(\d+).*/) {
-                $metrics{"${1}_pkts"} = [$2, 'L'],
-                $metrics{"${1}_bytes"} = [$3, 'L'],
-                $metrics{"${1}_drop_pkts"} = [$4, 'L'],
-                $metrics{"${1}_drop_bytes"} = [$5, 'L'],
+                $metrics{"${1}_pkts"} = [$2, 'L'];
+                $metrics{"${1}_bytes"} = [$3, 'L'];
+                $metrics{"${1}_drop_pkts"} = [$4, 'L'];
+                $metrics{"${1}_drop_bytes"} = [$5, 'L'];
             } else {
                 die "No queues found";
             }



More information about the Resmon-devel mailing list