Re^3: Adding custom header to Mail::Outlook::Message

What does running this give

use strict;
use Win32::OLE;
use Mail::Outlook;

my $mail = new Mail::Outlook();
my $message = $mail->create();
my $Outlook = $message->{'outlook'};

print "
Perl               $] 
Win32::OLE Version ${Win32::OLE::VERSION}
Mail::Outlook      ${Mail::Outlook::VERSION};
Outlook            $Outlook->{'Version'}\n";
[download]

This is what I have

Perl               5.016001
Win32::OLE Version 0.1709
Mail::Outlook      0.25;
Outlook            14.0.0.7172

poj

Comment on Re^3: Adding custom header to Mail::Outlook::Message Download Code

Replies are listed 'Best First'.
Re^4: Adding custom header to Mail::Outlook::Message by maskull (Novice) on Mar 13, 2017 at 16:27 UTC
Perl 5.014002 Win32::OLE Version 0.1709 Mail::Outlook 0.25; Outlook 15.0.0.4859	[reply]
Re^5: Adding custom header to Mail::Outlook::Message by poj (Abbot) on Mar 13, 2017 at 16:44 UTC
I don't think I can help any more as I only have an expired trial version of Office Professional 2010. All I can suggest is record a VBA macro to do what you want and post that here. I might be able to translate that to Perl. poj	[reply]