Email::Sender+Email::MIMEで添付ファイル | UCWD-Studio - @matsuoka_UCWDjp 's Private Projects.

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_

[itoken417]

添付してー