summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/latex4wp/dat2tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-09-14 22:53:37 +0000
committerKarl Berry <karl@freefriends.org>2010-09-14 22:53:37 +0000
commitd31e3cb2cb89121da9afc55e82d64ad45c6d6c86 (patch)
treeec3ba5d1b869806e876804b90fe7a370083a18ba /Master/texmf-dist/doc/latex/latex4wp/dat2tex
parent5e7679b3fae60cad87c935a8753cbc929b337f22 (diff)
new manual latex4wp 1.0.7 (14sep10)
git-svn-id: svn://tug.org/texlive/trunk@19730 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/latex4wp/dat2tex')
-rw-r--r--Master/texmf-dist/doc/latex/latex4wp/dat2tex28
1 files changed, 28 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/latex4wp/dat2tex b/Master/texmf-dist/doc/latex/latex4wp/dat2tex
new file mode 100644
index 00000000000..f7378a51973
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/latex4wp/dat2tex
@@ -0,0 +1,28 @@
+#!/bin/sh
+
+# dat2tex: converts tabular data to a tabular environment
+
+if [ $# != 1 ]; then
+ echo "Usage: $0 <datafile>"
+ exit 1
+fi
+
+# is this a cvs file?
+grep ";" $1 > /dev/null
+if [ $? = 0 ]; then
+ AWK="awk -F;"
+else
+ AWK=awk
+fi
+
+# ok awk, make my day
+$AWK '{if (1 == FNR) { \
+ printf "\\begin\{tabular\}\{"; \
+ for (i = 1; i <= NF; i++) {printf "l"}; \
+ printf "\}\n"
+ }
+ for (i = 1; i < NF; i++) \
+ {printf $i" & "} printf $NF" \\\\ \n"} \
+ END {printf "\\end\{tabular\}\n"}' $1
+
+# end of dat2tex