1*7f5f010bSBen Gras#!/bin/awk -f 2*7f5f010bSBen Gras# $NetBSD: mean.awk,v 1.5 1997/10/04 16:31:29 christos Exp $ 3*7f5f010bSBen Gras/^ *[0-9]/ { 4*7f5f010bSBen Gras # print out the average time to each hop along a route. 5*7f5f010bSBen Gras tottime = 0; n = 0; 6*7f5f010bSBen Gras for (f = 5; f <= NF; ++f) { 7*7f5f010bSBen Gras if ($f == "ms") { 8*7f5f010bSBen Gras tottime += $(f - 1) 9*7f5f010bSBen Gras ++n 10*7f5f010bSBen Gras } 11*7f5f010bSBen Gras } 12*7f5f010bSBen Gras if (n > 0) 13*7f5f010bSBen Gras print $1, tottime/n, median 14*7f5f010bSBen Gras} 15