tests/fileNoFile.tcl

   1 package require TclCurl
   2
   3 set curlHandle [curl::init]
   4
   5 puts "First we save in 'index.html'"
   6
   7 $curlHandle configure -noprogress  1 -url "127.0.0.1" -file "index.html"
   8 $curlHandle perform
   9
  10 puts "And now in stdout"
  11
  12 $curlHandle configure -file ""
  13 $curlHandle perform
  14
  15 $curlHandle cleanup
  16
  17
  18
  19
  20