#!/bin/rcif (! ~ $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
#!/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