hi,

I am trying to use the Mail::POP3Client.pm module to access my mailbox
When I run the script I get an error "cannot close..." which is generated by
the last line, If I comments this line, I get nothing on the command line,
the scripts runs without any output, what's wrong

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



#!/usr/bin/perl

use Mail::POP3Client;

$pop = new Mail::POP3Client( USER=> "username", PASSWORD=> "somepassword", HOST=> 
"myhost.com" );

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

  $pop->Close() or die "cannot close $!";

__________________________________

Click, Laugh and Enjoy @ www.sallini.com
tips and tricks, free tutorials @ www.teckies.com
  

_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Reply via email to