--- parse_iptraf.pl 2002/05/20 17:25:52 1.4 +++ parse_iptraf.pl 2002/05/22 07:11:08 1.5 @@ -2,6 +2,8 @@ # based on work of Eric Wong # available at http://www.taedium.net/rrd-iptraf/ [iptraf.txt] +# +# Dobrica Pavlinusic use strict; use warnings; @@ -57,7 +59,7 @@ close(LOG); foreach my $port (@PORTS) { - print @{$hash{$port}}[0] || 0,"\n",@{$hash{$port}}[1] || 0,"\n"; + print @{$hash{$port}}[0] || "U","\n",@{$hash{$port}}[1] || "U","\n"; delete $hash{$port}; } @@ -67,4 +69,7 @@ $sum_in+=@{$hash{$port}}[0]; $sum_out+=@{$hash{$port}}[1]; } + +$sum_in = "U" if ($sum_in == 0); +$sum_out = "U" if ($sum_out == 0); print "$sum_in\n$sum_out\n";