12 lines
149 B
Tcl
12 lines
149 B
Tcl
|
package require TclCurl
|
||
|
|
|
||
|
|
curl::transfer -url "127.0.0.1" -verbose 1 -nobody 1 \
|
||
|
|
-useragent "Mozilla 4.0 (compatible; Getleft 0.10.4)"
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|