Re^2: charset and content transfer encoding with Win32::OLE

I should be able to send various emails via Outlook. I succeeded to modify the Content-Type in the following way:

my $mail = new Win32::OLE('Outlook.Application');
my $ol = Win32::OLE::Const->Load($mail);
my $item = $mail->CreateItem(0);

$item->{'To'} = "stam@walla.com"; 
$item->{'Subject'} = "important";

$item->{'BodyFormat'} = "olFormatHTML";
$item->{'HTMLBody'} = "<HTML><H2>The body of this message will appear 
+in HTML.</H2><BODY>Type the message text here. </BODY></HTML>";
[download]

But I also should be able to modify the Content-Transfer-Encoding and the charset.
The Content-Transfer-Encoding types that I'm interested in are UUEncode, QPrint, Base64
No special preferences for charset, since I should test as many as possible.
Any help would be appreciated,
ElaBela

Comment on Re^2: charset and content transfer encoding with Win32::OLE Download Code