SMTP AUTH CRAM-MD5

krkeegan has asked for the wisdom of the Perl Monks concerning the following question:

This took me a while to figure out. But smtp.pm does not offer support for AUTH, I wish it did. However I have created a sockets version that has the auth command programed in. My QUESTION, how do I create the encrypted user and pass, below is a copy of outlooks communication with my server(Pass changed for safety).

SMTP Log started at 07/18/2001 09:39:09
SMTP: 09:39:16 [rx] 220 host-serve.net ESMTP
SMTP: 09:39:16 [tx] EHLO connectixcorp
SMTP: 09:39:16 [rx] 250-host-serve.net
SMTP: 09:39:16 [rx] 250-AUTH=LOGIN CRAM-MD5
SMTP: 09:39:16 [rx] 250-AUTH LOGIN CRAM-MD5
SMTP: 09:39:16 [rx] 250-PIPELINING
SMTP: 09:39:16 [rx] 250 8BITMIME
SMTP: 09:39:16 [tx] AUTH LOGIN
SMTP: 09:39:16 [rx] 334 VXNlcm5hbWU6
SMTP: 09:39:16 [tx] a2V2aW4=
SMTP: 09:39:16 [rx] 334 UGFzc3dvcmQ6
SMTP: 09:39:16 [tx] dGVzdA==
SMTP: 09:39:20 [rx] 535 auth failure
[download]

I have tried crypt::MD5 and digest::MD5 both create a encryption to long. Anyone know what I can do?

Thanks
Kevin Robert Keegan

Comment on SMTP AUTH CRAM-MD5 Download Code

Replies are listed 'Best First'.
Re: SMTP AUTH CRAM-MD5 by krkeegan (Novice) on Nov 02, 2001 at 06:49 UTC
Well without any help! I cam up with my own solution, ha answering my own question. If you are interested you can see it and test to see if it will work on you SMTP server here: http://www.krkeegan.com/smtp_auth Kevin Robert Keegan	[reply]