$verify = 'f$verify("NO")'
$!   REMOTE.SUB - this is a sub-command procedure that works with the 
$!	REMOTE.COM and REMOTE.EXE to execute commands on a remote node.
$on error then $ goto abort
$!
$do_loop:
$ read/end=enddo_loop/error=enddo_loop net command
$'command'
$ write net ""		!'f$verify("NO")'
$ goto do_loop
$enddo_loop:
$!
$ goto exit
$!
$abort:				!'f$verify("NO")'
$ exit '$status'		!'f$verify(VERIFY)'
$!
$exit:
$if verify then set verify	!'f$verify("NO")'
