perfratio 624 B

123456789101112131415161718192021222324252627282930313233343536
  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 ("%12.1f", base);
  18. for (i = 2; i < '$1'; i++) {
  19. if (base == 0)
  20. printf (" lots ", $i);
  21. else {
  22. rate=$i/base;
  23. printf (" %10.3f", rate);
  24. }
  25. }
  26. printf (" ");
  27. for (; i <= NF; i++)
  28. {
  29. printf ("%s ", $i);
  30. }
  31. printf ("\n");
  32. next;
  33. }
  34. { print $0; }
  35. '