ref: 7d7e8ae31ac01434c7017afce4eb0a033281a757
dir: /sys/src/cmd/lp/lpsend.rc/
#!/bin/rc if (! ~ $DEBUG '') { flag x + } if (test -e /net/tcp/clone) { dialstring=`{ndb/query sys $1 dom} network=tcp if (~ $#dialstring 0 || ! ~ $dialstring '') { dialstring=$1 } if(lpsend $network^!^$dialstring^!printer) exit '' rv='tcp failed' } if not rv='no tcp' if (! ~ $dialstring '') exit 'lpsend: no dialstring' if not exit 'lpsend: '^$rv