Customer Support

Here is a simple example of a Perl script which prints out the subject 
line of any unseen mail in your inbox (marking them as seen in the
process):


     #!/usr/bin/perl

     use Net::IMAP::Simple;

     # open a connection to the IMAP server
     $server = new Net::IMAP::Simple( 'mail.modwest.com' );

     # login
     $server->login( 'YOURUSERNAME', 'YOURPASSWORD' );

     # select the desired folder
     $number_of_messages = $server->select( 'inbox' );

     # go through all the messages in the selected folder
     foreach $msg ( 1..$number_of_messages )
     {
       if (! $server->seen( $msg ) )
       {
         $fh = $server->getfh( $msg );
         while( <fh> )
         {
           $line = $_;

           if($line =~ /Subject:/)
           {
             print $line;
           }
         }
         close $fh;
       }

     }

Hi,

I have recently had the same task to solve and found that one can have a
workaround by using www.email2php.com.