I know this is a non-perl solution, but it would work just fine and you already have all the tools available to you.

Set up an IP Security Policy between the Server (optional) and the client (mandatory). Now when the client requests a TCP connection to the server it will be automatically encrypted (assuming you set up the policy that way) and no one can listen to any data over the wire, including plain text passwords.

HTH.