Not specifically. A large number of different code examples exist here on this site, and I would hate to do ALL of your work for you, but I'll try and give you a couple hints:

use strict;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Outlook';

$|++;
$Win32::OLE::Warn = 3; # Fail on errors

my $OL = Win32::OLE->GetActiveObject('Outlook.Application')
        || Win32::OLE->new('Outlook.Application', 'Quit');

    my $NameSpace = $OL->GetNameSpace("MAPI");
    my $Folder = $NameSpace->GetDefaultFolder(olFolderInbox);
    
   foreach my $msg (in $Folder->{Items}){
       ##Do something with them.
   }
[download]

and for a wonderful tutorial on using excel (in the works), feel free to give my scratch pad a once over (or two or three times even).

The OLE Object Viewer that ships with AS will also be VERY helpful to you. I found the file : c:\perl\html\site\win32\ole\browser

C-.