Your code works for me. Except i have added :

use strict;
use warnings;
[download]

And i have also commented:

my $Outlook = new Win32::OLE('Outlook.Application');
[download]

because you have already defined it.

What Outlook version you trying?