[19:09:40] hornyakn@Zeus:~/scriptek/ssl_client-server> ./server.pl
Name "main::CLIENT" used only once: possible typo at ./server.pl line 41.
DEBUG: .../IO/Socket/SSL.pm:1550: new ctx 11098800
server started, listening on port 6543
DEBUG: .../IO/Socket/SSL.pm:494: no socket yet
DEBUG: .../IO/Socket/SSL.pm:496: accept created normal socket IO::Socket::SSL=GLOB(0x9f0c58)
DEBUG: .../IO/Socket/SSL.pm:512: starting sslifying
DEBUG: .../IO/Socket/SSL.pm:552: Net::SSLeay::accept -> 1
DEBUG: .../IO/Socket/SSL.pm:600: handshake done, socket ready
DEBUG: .../IO/Socket/SSL.pm:500: accept_SSL ok
Can't locate object method "host" via package "IO::Socket::SSL" at ./server.pl line 35.
DEBUG: .../IO/Socket/SSL.pm:1587: free ctx 11098800 open=11098800
DEBUG: .../IO/Socket/SSL.pm:1595: OK free ctx 11098800
[19:08:45] hornyakn@Zeus:~/scriptek/ssl_client-server> ./client.pl
DEBUG: .../IO/Socket/SSL.pm:1550: new ctx 7977984
DEBUG: .../IO/Socket/SSL.pm:334: socket not yet connected
DEBUG: .../IO/Socket/SSL.pm:336: socket connected
DEBUG: .../IO/Socket/SSL.pm:354: ssl handshake not started
DEBUG: .../IO/Socket/SSL.pm:397: Net::SSLeay::connect -> 1
DEBUG: .../IO/Socket/SSL.pm:452: ssl handshake done
connected to server localhost:6543
write_all VM at entry=vm_unknown
partial `testmessage'
written so far 11:11 bytes (VM=vm_unknown)
DEBUG: .../IO/Socket/SSL.pm:1587: free ctx 7977984 open=7977984
DEBUG: .../IO/Socket/SSL.pm:1595: OK free ctx 7977984