apps/JAWS/clients/WebSTONE/bin/tabs2html


1
2
3
4
5
6
7
8
9
10
11
12
13

#! /bin/sh

nawk '
BEGIN { FS=" " ; print "<BODY><TABLE>" }
{
	print "<TR ALIGN=RIGHT VALIGN=BOTTOM>"
	for (i=1; i <= NF; i++) {
		print "<TD>" $i "</TD>"
	}
	print "</TR>"
}
END { print "</TABLE></BODY>" }
' $*