Net::SMTP は当然、Mail::Sender あたりで添付メールの送信は自前でエンコードしたり
マルチパートヘッダを作ったりしてメンドイので、モジュールで。
他に、エンコードのための MIME::Base64 等は必要。
----
use Mail::Sender;
$sender = new Mail::Sender { smtp => 'localhost',
from => 'zaki@localhost' };
$sender->MailFile( { to => 'zaki@localhost',
subject => 'attachment file',
msg => 'hello :)',
file => '/tmp/sample.tar.gz' } );
----
MailFile メソッドではなく MailMsg メソッドを使えば、マルチパートではない
通常のシングルパートのメールを送信可能