Str255 UnixCommand
Str255 UnixResponse

print "DNS IPv4 resolved for www.kame.net:"
UnixCommand = "nslookup -querytype=A www.kame.net"
open "UNIX", 1, UnixCommand
while ( not eof( 1 ) )
  input #1, UnixResponse
  print UnixResponse
wend
close 1

print ""

print "DNS IPv6 resolved for www.kame.net:"
UnixCommand = "nslookup -querytype=AAAA www.kame.net"
open "UNIX", 1, UnixCommand
while ( not eof( 1 ) )
  input #1, UnixResponse
  print UnixResponse
wend
close 1

HandleEvents