initial checkin of TclCurl
This commit is contained in:
13
tests/cookieFile.tcl
Executable file
13
tests/cookieFile.tcl
Executable file
@ -0,0 +1,13 @@
|
||||
package require TclCurl
|
||||
|
||||
if {![file exists /home/andres/.getleft/cookies]} {
|
||||
puts "The given cookie file doesn't exist"
|
||||
}
|
||||
|
||||
curl::transfer -url 127.0.0.1 \
|
||||
-cookiefile "/home/andres/.getleft/cookies" -verbose 1
|
||||
|
||||
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user