Mail Builder

#!/usr/bin/perl -w
use strict;
use Mail::Builder;
my $mail = Mail::Builder->new();
$mail->from('tester@localhost.ru','tester');
$mail->to('sed@localhost.ru','sed');
$mail->subject('Test message unicode');
$mail->htmltext('

Moeeeoooowwwwww

... ');
$mail->attachment('blblabla.dpf');
print $mail->stringify;