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