diff options
-rwxr-xr-x | net_if | 20 |
1 files changed, 17 insertions, 3 deletions
@@ -79,6 +79,22 @@ sub get_if_stats { return $stats; } +sub print_stats { + my ($stats, $count, $perfdata, $if); + $stats = shift @_; + + $count = keys %$stats; + $perfdata = ""; + for (keys %$stats) { + $if = $_; + for (qw( in4 out4 in6 out6 )) { + $perfdata = "$perfdata $if-$_=$stats->{$if}->{$_}"; + } + } + + ok("$count interfaces | $perfdata"); +} + my ($up, $down, $error) = get_if_status(@ARGV); if (@$error) { @@ -97,6 +113,4 @@ while (@$up) { $stats->{$if} = get_if_stats($if); } -use Data::Dumper; -print Dumper $stats; -print "\n"; +print_stats($stats) |