#!/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
}