parm addr,packets=5,size=64
#
# ping with integrated nslookup
#
/BIND/PUB/bin/nslookup !addr >pingtmp1
if finfo('pingtmp1','eof') < 5 then
  print pingtmp1
  return
endif
print pingtmp1;start=-3
/bin/awk '''NR==5{system("/SYS/NET/PING \"" &
            $2 ",!packets,!size\"")}'''   <pingtmp1
purge pingtmp1,temp