"password incorrect" error - MD5

Hello NeoMail Users,

I've been using NeoMail for about 6 months. I think it is a very good 
program. Thank you Ernie.

I recently ran into a problem. I was adding modules to Perl (Magik) for 
another program and -- I'm not sure there is a connection here but -- I 
was unable to use NeoMail afterwards. The CPAN asked to manually 
reconfigure the conf file and I declined whereby it started an 
auto-configuration routine.

My first indication of a problem was the standard "unable to locate 
neomail.conf" error. I found that my permissions to the *.pl files were 
changed. (?!) So.. I changed them back to the correct permissions. Now I 
attempt to log into NeoMail and get the following error:
INVALID LOGIN
"Sorry, the password you entered was incorrect! Please go back and try 
again."

So, I added a new user to my account and still I get the same error.


___________________________________________________________________
Another bit of related information:
I have an MD5 error when I try to install any perl modules, e.g.:

cpan> install Bundle::CPAN
CPAN: MD5 loaded ok
Can't locate object method "new" via package "MD5" (perhaps you forgot 
to load "MD5"?) at /usr/lib/perl5/5.6.1/CPAN.pm line 4212.


______________________________________________________________
I "autobundle" in CPAN and get the following information:

Package namespace         installed    latest  in CPAN file
.
.
Digest::MD5                    2.20      2.20  G/GA/GAAS/Digest-
MD5-2.20.tar.gz
.
.
MD5                            2.20      2.02  G/GA/GAAS/MD5-2.02.tar.gz
.
.

Note the "installed" vs the "latest" version numbers for MD5. (?)

cpan> install MD5
MD5 is up to date.

cpan> install Digest::MD5
Digest::MD5 is up to date.


________________________________________________
MD5 and Digest::MD5:


[root@************* neomail]# locate MD5
/root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.02.tar
/root/.cpan/sources/authors/id/G/GA/GAAS/MD5-2.02.tar.gz
/usr/lib/perl5/site_perl/5.6.1/IM/MD5.pm
/usr/lib/perl5/5.6.1/i386-linux/MD5.pm
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux/Digest/MD5.pm
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux/auto/Digest/MD5
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux/auto/Digest/MD5/MD5.bs
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux/auto/Digest/MD5/MD5.so
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux/MD5.pm
/usr/share/doc/kdelibs-devel-3.0.0/kdecore/KMD5.html
/usr/share/doc/kdelibs-devel-3.0.0/kdecore/full-list-KMD5.html
/usr/share/man/man3/Digest::MD5.3pm.gz
/usr/share/pear/Crypt/HCEMD5.php

and

[root@********* MD5-2.02]# locate Digest::MD5
/usr/share/man/man3/Digest::MD5.3pm.gz


____________________________________________
and the header of neomail.conf:


use strict;
no strict 'vars';
push (@INC, '/var/neomail');
use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser);
use Fcntl qw(:DEFAULT :flock);
use FileHandle;
##use MD5;
use Digest::MD5 qw(md5 md5_hex md5_base64);
##BEGIN { @AnyDBM_File::ISA = qw(DB_File GDBM_File) }
##use Digest::MD5
use AnyDBM_File;


__________________________________________
Permissions:


[root@*********** neomail]# pwd
/var/neomail
[root@*********** neomail]# ls -lart
total 72
drwxrwx---   23 root     neomail      4096 Jul 16 01:47 templates
drwxrwx---    2 root     neomail      4096 Jul 16 01:47 styles
drwxrwx---    2 root     neomail      4096 Jul 16 01:47 lang
drwxr-xr-x   29 root     root         4096 Jul 16 09:18 ..
-rwsr-xr-x    1 root     root          710 Jul 19 06:33 checklogin.pl
-rwxrwx---    1 root     neomail      7585 Oct 26 18:34 neomail.conf
drwxrwx---   16 root     neomail      4096 Oct 27 10:02 users
drwxrwxr-x    6 root     neomail      4096 Oct 29 11:08 .
-rw-rw----    1 root     neomail     35432 Oct 29 11:31 neomail.log


[root@*********** neomail]# ls -lart /var/www/cgi-bin/P
total 1380
-rwsr-sr-x    1 root     neomail     46982 Oct 26 23:24 neomail-prefs.pl
drwxrwxrwx   11 root     root         4096 Oct 28 17:05 ..
-rwsr-sr-x    1 root     neomail    120730 Oct 29 10:53 neomail.pl
drwxrwxrwx    4 root     root         4096 Oct 29 10:54 .