xref: /plan9/rc/bin/doc2ps (revision 42dedc50a943b5d120c8c26dac13fc4664b65146) 
1#!/bin/rc
2# doc2ps [file.doc] - convert ms word document to postscript
3rfork e
4fn usage {
5	echo usage: doc2ps '[file.doc]' >[1=2]
6	exit usage
7}
8switch ($#*) {
9case 0
10	file=/tmp/antiword.doc.$pid
11	fn sigexit { rm $file; exit $s }
12	cat >$file
13case 1
14	if(~ $1 -*)
15		usage
16	file=$1
17case *
18	usage
19}
20aux/antiword -i0 -p letter $file
21s=$status
22