perl/debian Mail::POP3Client, not working

[cmustard <cmustard@nyc.rr.com>]

I have asked this question at a perl.org list and havent' gotten a response,
i thought i would try here as well, i don't know if it may be a debian
'issue', any ideas? 

Ok, this is very frustrating, 2 days and many hours worth! I have used this 
module/lib (libwww) before with ease (on other distro's). The only thing 
i can think of is if it could be my linux distro? (Debian Woody 3.0),
although i can't think why, or maybe the pop-servers encrytion methods?.

The following is the exact script i am trying to run, (except with my 
personal info removed) and below is the Debugging info i'm getting.

All my supplied data is correct, (i.e. username and password, i use the exact
same info for ~/.fetchmailrc and i retrieve mail fine. I am including a
Microsoft pop-server and a 'unknown' although probably some form of
*NIX server. 

I was also reciveing some MD5.pm error's although they seem be gone. 
I would appreciate any info, guidance or help anyone could provide.
thank you.

-mUs.

<script>
#!/usr/bin/perl -w

use Mail::POP3Client;
use strict;
use warnings;

my($pop,$usr,$passwd,$host,$i);
$usr = 'me@me.com';
$passwd = 'clear_text';
$host = 'pop.me.com';   


$pop = new Mail::POP3Client( USER  => "$usr",
                             PASSWORD => "$passwd",
                             DEBUG     => 1,
                             HOST     => "$host");

for ($i = 1; $i <= $pop->Count(); $i++) {
   foreach ( $pop->Head( $i ) ) {
        (/^(From|Subject):\s+/i) && print $_, "\n";
   }
  print "\n";
}
$pop->Close();

</script>

---------------------------------------------------------------------

<debug output>

POP3 <- +OK
 at ./J_mail_client line 15
POP3 -> USER me@me.com
 at ./J_mail_client line 15
POP3 <- +OK
 at ./J_mail_client line 15
POP3 -> PASS clear_text
 at ./J_mail_client line 15
POP3 <- -ERR
 at ./J_mail_client line 15
POP3 -> QUIT
 at ./J_mail_client line 26
Use of uninitialized value in join or string at /usr/share/perl/5.6.1/Carp/Heavy.pm line 145, <GEN0> line 3.
POP3 <-  at ./J_mail_client line 26
Use of uninitialized value in pattern match (m//) at /usr/share/perl5/Mail/POP3Client.pm line 828, <GEN0> line 3.
Use of uninitialized value in pattern match (m//) at /usr/share/perl5/Mail/POP3Client.pm line 313.

</debug output>

------------------------------------------------------------------------

<debug output on msserver>

POP3 <- +OK Microsoft POP3 Server Version: 5.5.1877.747.74 ready <23423423.34454545me.me.com>
 at ./N_mail_client line 15
POP3 -> APOP me@me.com erierj24353245ksdfj4534k4j5k45j
 at ./N_mail_client line 15
POP3 <- -ERR APOP not supported.
 at ./N_mail_client line 15
POP3 -> USER me@me.com
 at ./N_mail_client line 15
POP3 <- +OK Waiting for password
 at ./N_mail_client line 15
POP3 -> PASS clear_text
 at ./N_mail_client line 15
POP3 <- -ERR Permission denied
 at ./N_mail_client line 15
POP3 -> QUIT
 at ./N_mail_client line 27
POP3 <- +OK
 at ./N_mail_client line 27

 </debug msserver>