projects
/
bcm963xx.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Revert "Revert "and added files""
[bcm963xx.git]
/
userapps
/
opensource
/
ipsec-tools
/
src
/
racoon
/
stats.pl
1
#!/usr/bin/perl
2
# usage:
3
# % cat /var/log/racoon-stats.log | perl stats.pl
4
5
while(<STDIN>) {
6
chomp;
7
($a, $a, $a, $a, $a, $b) = split(/\s+/, $_, 6);
8
($a, $c) = split(/:/, $b, 2);
9
$r{$a} += $c;
10
$t{$a}++;
11
}
12
13
foreach (sort keys %t) {
14
printf "%s: total=%d avg=%8.6f\n", $_, $t{$_}, $r{$_}/$t{$_};
15
}