ipresolve.tcl

   1 package require TclCurl
   2
   3 set curlHandle [curl::init]
   4 $curlHandle configure -url "http://127.0.0.1" -filetime 1 -ipresolve v4 \
   5         -verbose 1 -nobody 1
   6 $curlHandle perform
   7
   8 $curlHandle cleanup
   9
  10
  11
  12
  13
  14