11.1Scgd#!/bin/awk -f
21.5Schristos#	$NetBSD: mean.awk,v 1.5 1997/10/04 16:31:29 christos Exp $
31.1Scgd/^ *[0-9]/	{
41.1Scgd	# print out the average time to each hop along a route.
51.1Scgd	tottime = 0; n = 0;
61.1Scgd	for (f = 5; f <= NF; ++f) {
71.1Scgd		if ($f == "ms") {
81.1Scgd			tottime += $(f - 1)
91.1Scgd			++n
101.1Scgd		}
111.1Scgd	}
121.1Scgd	if (n > 0)
131.1Scgd		print $1, tottime/n, median
141.1Scgd}
15