Email::Sender + Email::MIMEでのメール送信で、ファイルを添付したい場合、CPANにあるEmail::MIMEのサンプルにある通りIO::Allを利用すると、あっという間に対応可能です。 これまで同様、Perlによるメール送信(Email::Sender)のサンプルを元に添付ファイル付きメール送信のコードを書いてみます。 use strict; use warnings; use utf8; use Encode qw(encode); use Email::MIME; use Email::MIME::Creator; use Email::Sender::Simple qw(sendmail); use IO::All; my $from = q("送信者の名前" <from_mail@example.jp>); my $to = q("受信者の名前" <to_
![Email::Sender+Email::MIMEで添付ファイル | UCWD-Studio - @matsuoka_UCWDjp 's Private Projects.](https://cdn-ak-scissors.b.st-hatena.com/image/square/a1fde9f041e2165d9a705da09e5c38d60338d3d5/height=288;version=1;width=512/http%3A%2F%2Fucwd.jp%2Fwp-content%2Fuploads%2F2016%2F03%2FmainThumb.png)