perfratio revision 264fa531 
1#!/bin/sh
2awk '
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 	}
15READY==1 {
16		base=$1;
17		printf ("%8.1f", base);
18		for (i = 2; i < '$1'; i++) {
19			if (base == 0)
20				printf ("   lots ", $i);
21			else {
22				rate=$i/base;
23				if (rate < .1)
24					printf ("  %6.3f", rate);
25				else if (rate < 1000)
26					printf ("  %6.2f", rate);
27				else
28					printf ("  %6.0f", 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