1#!/bin/rc 2# lpsend.rc dialstring - run lpsend network!dialstring!printer 3if (! ~ $DEBUG '') 4 flag x + 5if (! test -e /net/tcp/clone) 6 exit 'no tcp' 7 8dialstring=`{ndb/query sys $1 dom} 9if (~ $#dialstring 0 || ~ $dialstring '') # no dom for sys in ndb? 10 dialstring=$1 # use arg unchanged 11 12lpsend tcp!^$dialstring^!printer 13exit $status 14