connecting to TLS server using TLS package

I am trying to implement a client (not neccessary a web client)
that talks to a SSL enabled server, I was experimenting
with TLS package and used my https server as a server.

Forgive my ignorance in TLS, I am obviously not very
knowledgable in it. But the help page seems
to suggest that I should be able to use tls::socket
in place of socket command and I'll be fine (without even using
tls::import)

I've tied communicating with a (not neccessary OPENSSL) SSL
enabled web sever, I did:

(bin) 25 % package require tls
1.5.0
(bin) 26 % set s [::tls::socket $addr 443]
sock188
(bin) 27 % ::tls::handshake $s
1
(bin) 28 % puts $s "GET / HTTP/1.1"
(bin) 29 % puts $s ""
(bin) 30 % flush $s
(bin) 31 % gets $s

I am not sure what I did wrong at all, but the last
gets $s just hangs there.. seemingly I have not established
the connection, but tls::status $s returns all the good
stuff...

My web server does not require authentication from client...
so what have I done wrong? Can someone help out? Thanks alot.
Received on Sun Apr 30 02:17:29 2006