i dont know if this helps, but anyway, this is the code I use in TclSigX to update signatures:
(in config.tcl):
Code:
set ::settings::other::updateUrl "sigx.yuriy.net:80/update.php"
(in tclsigx.tcl):
Code:
::http::geturl $::settings::other::updateUrl -query "username=[urlEncode $::settings::account::username]&password=[pwdc $::settings::account::password]&data=[urlEncode $::data::sig]&version=TclSigX-$::data::version"
that last command returns a token which I store in $httpToken. i then do:
Code:
::http::wait $httpToken
which stops TclSigX doing anything until it receives a response from the server, then I check the response with:
Code:
if {[::http::data $httpToken]!={[--- Update Successful ---]}} {
puts ""
puts stderr "Error: The server (${::settings::other::updateUrl}) did not seem to accept the update. :-/ Returned output was:"
puts stderr " \"[::http::data $httpToken]\" "
exit
}
# and we are now finished! ^^
puts "Finished! ^_^"
exit
as you can see, high level languages such as Tcl take care of many of the little details that can get in the way at times.