home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / x / x11p-13.zip / perfboth.cpp < prev    next >
Text File  |  1991-04-30  |  788b  |  41 lines
  1. /**/#!/bin/sh
  2. awk '
  3. /^     1/ && READY == 0 {    printf ("    1   ");
  4.         for (i = 2; i < NF; i++)
  5.             printf ("          %2d        ", i);
  6.         printf ("   Operation\n");
  7.         next;
  8.     }
  9. /^---/    {     printf ("--------");
  10.         for (i = 2; i <= NF; i++)
  11.             printf ("   -----------------");
  12.         printf ("\n");
  13.         READY=1; next;
  14.      }
  15. READY==1 {
  16.         base=$1;
  17.         printf ("%8.1f", base);
  18.         for (i = 2; i < '$1'; i++) {
  19.             if (base == 0)
  20.                 printf ("   %8.1f         ", $i);
  21.             else {
  22.                 rate=$i/base;
  23.                 if (rate < .1)
  24.                     printf ("   %8.1f (%6.3f)", $i, rate);
  25.                 else if (rate < 1000)
  26.                     printf ("   %8.1f (%6.2f)", $i, rate);
  27.                 else
  28.                     printf ("   %8.1f (%6.0f)", $i, rate);
  29.             }
  30.         }
  31.         printf ("   ");
  32.         for (; i <= NF; i++)
  33.         {
  34.             printf ("%s ", $i);
  35.         }
  36.         printf ("\n");
  37.         next;
  38.        }
  39.        { print $0; }
  40. '
  41.