+ unshift @allRxPkts, $cols[1]; pop @allRxPkts;
+ unshift @allTxPkts, $cols[2]; pop @allTxPkts;
+ unshift @allRxBytes, $cols[3]; pop @allRxBytes;
+ unshift @allTxBytes, $cols[4]; pop @allTxBytes;
+ unshift @totalBytes, $cols[3] + $cols[4]; pop @totalBytes;
+ if ($cols[3] > $allRxBytesPeak) { $allRxBytesPeak = $cols[3] }
+ if ($cols[4] > $allTxBytesPeak) { $allTxBytesPeak = $cols[4] }
+ if (($cols[3] + $cols[4]) > $totalBytesPeak) {
+ $totalBytesPeak = $cols[3] + $cols[4];
+ }
+
+ my $sum = $allRxPkts[0];
+ $allRxPkts1 = $sum;
+ foreach (@allRxPkts[1 .. 4]) { $sum += $_ }
+ $allRxPkts5 = $sum / 5;
+ foreach (@allRxPkts[5 .. 9]) { $sum += $_ }
+ $allRxPkts10 = $sum / 10;
+
+ $sum = $allTxPkts[0];
+ $allTxPkts1 = $sum;
+ foreach (@allTxPkts[1 .. 4]) { $sum += $_ }
+ $allTxPkts5 = $sum / 5;
+ foreach (@allTxPkts[5 .. 9]) { $sum += $_ }
+ $allTxPkts10 = $sum / 10;
+
+ $allRxBytes1 = $sum;
+ foreach (@allRxBytes[1 .. 4]) { $sum += $_ }
+ $allRxBytes5 = $sum / 5;
+ foreach (@allRxBytes[5 .. 9]) { $sum += $_ }
+ $allRxBytes10 = $sum / 10;
+
+ $sum = $allTxBytes[0];
+ $allTxBytes1 = $sum;
+ foreach (@allTxBytes[1 .. 4]) { $sum += $_ }
+ $allTxBytes5 = $sum / 5;
+ foreach (@allTxBytes[5 .. 9]) { $sum += $_ }
+ $allTxBytes10 = $sum / 10;
+
+ $sum = $totalBytes[0];
+ $totalBytes1 = $sum;
+ foreach (@totalBytes[1 .. 4]) { $sum += $_ }
+ $totalBytes5 = $sum / 5;
+ foreach (@totalBytes[5 .. 9]) { $sum += $_ }
+ $totalBytes10 = $sum / 10;
+