You might try WWW::Hotmail. FYI, for future reference, going to http://search.cpan.org is a good start. From that cpan page:

  use WWW::Hotmail;
  
  my $hotmail = WWW::Hotmail->new();
  
  $hotmail->login('foo@hotmail.com', "bar")
   or die $WWW::Hotmail::errstr;
  
  my @msgs = $hotmail->messages();
  die $WWW::Hotmail::errstr if ($!);

  print "You have ".scalar(@msgs)." messages\n";

  for (@msgs) {
        print "messge from ".$_->from."\n";
        # retrieve the message from hotmail
        my $mail = $_->retrieve;
        # deliver it locally
        $mail->accept;
        # forward the message
        $mail->resend('myother@email.address.com');
        # delete it from the inbox
        $_->delete;
  }
  
  $hotmail->compose(
    to      => ['user@email.com','otheruser@otheremail.com'],
    subject => 'Hello Person!',
    body    => q[Dear Person,
  
  I am writing today to tell you about something important.

  Thanks for all your support.
  
  Sincerely,
  Other Person
  ]) or die $WWW::Hotmail::errstr;
[download]