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
/
perfratio.cpp
< prev
next >
Wrap
Text File
|
1991-04-30
|
727b
|
41 lines
/**/#!/bin/sh
awk '
/^ 1/ && READY == 0 { printf (" 1 ");
for (i = 2; i < NF; i++)
printf (" %2d ", i);
printf (" Operation\n");
next;
}
/^---/ { printf ("--------");
for (i = 2; i < NF; i++)
printf (" ------");
printf (" ---------\n");
READY=1; next;
}
READY==1 {
base=$1;
printf ("%8.1f", base);
for (i = 2; i < '$1'; i++) {
if (base == 0)
printf (" lots ", $i);
else {
rate=$i/base;
if (rate < .1)
printf (" %6.3f", rate);
else if (rate < 1000)
printf (" %6.2f", rate);
else
printf (" %6.0f", rate);
}
}
printf (" ");
for (; i <= NF; i++)
{
printf ("%s ", $i);
}
printf ("\n");
next;
}
{ print $0; }
'