ACE/apps/JAWS/clients/WebSTONE/bin/tabs2html

   1 #! /bin/sh
   2
   3 nawk '
   4 BEGIN { FS=" " ; print "<BODY><TABLE>" }
   5 {
   6         print "<TR ALIGN=RIGHT VALIGN=BOTTOM>"
   7         for (i=1; i <= NF; i++) {
   8                 print "<TD>" $i "</TD>"
   9         }
  10         print "</TR>"
  11 }
  12 END { print "</TABLE></BODY>" }
  13 ' $*