1
2
3
4
5
6
7
8
9
10
11
12
13
14
my $msg = build MIME::Lite
From => 'sender@email',
To => $mail_recipient,
Subject => $mail_subject,
Type => 'text/plain',
Data => $mail_text;
attach $msg
Type => "text/plain",
Path => $original_file,
Encoding => "base64",
MIME::Lite->send('smtp', $mail_server_ip, Timeout=>60);
$msg->send;
2013-08-06T10:02:31 MuffiData?
Data => $daten,