#! /bin/sh
case $1 in
-P*)	printer=$1; shift;;
esac
cat << \what_a_maroon > /tmp/foo$$
@document(language ultrascript, outputbin left, jobheader off)
what_a_maroon
for i
do
	cat /tmp/foo$$ $i | lpr $printer
done
rm -f /tmp/foo$$