tlpdspool - plan9port - [fork] Plan 9 from user space
(HTM) git clone git://src.adamsgaard.dk/plan9port
(DIR) Log
(DIR) Files
(DIR) Refs
(DIR) README
(DIR) LICENSE
---
tlpdspool (295B)
---
1 #!/usr/local/plan9/bin/rc
2
3 if (! ~ $DEBUG '') flag x +
4
5 if (~ $#* 0) *=''
6
7 for (j in $*) {
8 if (~ $j '' || test -f $j) {
9 lpinput $j lpsub process $LPPROC |
10 lpdsend -d$OUTDEV -tf -H$LPMACHID -P$LPUSERID $DEST_HOST >[2]$LPLOGDIR/$LPDEST^.st
11 }
12 if not {
13 echo $j cannot be opened >[1=2]
14 }
15 }