#!/usr/bin/env ksh

# @(#) s3	Demonstrate table generation with tbl.

pe() { for _i;do printf "%s" "$_i";done; printf "\n"; }
pl() { pe;pe "-----" ;pe "$*"; }
db() { ( printf " db, ";for _i;do printf "%s" "$_i";done;printf "\n" ) >&2 ; }
db() { : ; }
C=$HOME/bin/context && [ -f $C ] && . $C tbl groff


pl " Input file t1:"
cat t1

pl " Results:"
tbl t1 |
groff -T ascii

exit 0

% ./s3

Environment: LC_ALL = C, LANG = C
(Versions displayed with local utility "version")
OS, ker|rel, machine: Linux, 2.6.26-2-amd64, x86_64
Distribution        : Debian GNU/Linux 5.0.8 (lenny) 
ksh 93s+
tbl GNU tbl (groff) version 1.18.1
groff GNU groff version 1.18.1

-----
 Input file t1:
.TS
tab(;) allbox;
c s s s
l l l l.
PO Download statistics - Host to SOM
Time;Receive Time;Processing Time;PO count
4.30 AM OMHPO File;Tue Feb 21 04:39:55 EST 2012;Tue Feb 21 05:38:58 EST 2012;17508
.TE

-----
 Results:
grotty:t1:7: character above first line discarded
+--------------------------------------------------------------------------------------------+
|                           PO Download statistics - Host to SOM                             |
+-------------------+------------------------------+------------------------------+----------+
|Time               | Receive Time                 | Processing Time              | PO count |
+-------------------+------------------------------+------------------------------+----------+
|4.30 AM OMHPO File | Tue Feb 21 04:39:55 EST 2012 | Tue Feb 21 05:38:58 EST 2012 | 17508    |
+-------------------+------------------------------+------------------------------+----------+