git: 9front

ref: 8da648a8d1939d68e40c0fc351c5a9b8beb3f16d
dir: /rc/bin/doc2ps/

View raw version 
#!/bin/rc
# doc2ps [file.doc] - convert ms word document to postscript
rfork e
fn usage {
	echo usage: doc2ps '[file.doc]' >[1=2]
	exit usage
}
switch ($#*) {
case 0
	file=/tmp/antiword.doc.$pid
	fn sigexit { rm $file; exit $s }
	cat >$file
case 1
	if(~ $1 -*)
		usage
	file=$1
case *
	usage
}
aux/antiword -i0 -p letter $file 
s=$status