いつもはMIME::Liteを使うけど、他のモジュールも検討してみようとEmail::MIME::CreatorとEmail::Sendを使ってみます。 「メールの送信 - モダンなPerl入門 - モダンなPerl入門」を参考に、charsetとX-Mailerも指定します。 #!/usr/bin/env perl use strict; use warnings; use utf8; use Email::MIME::Creator; use Email::Send; use Encode; MAIN:{ my $mime = Email::MIME->create( header => [ From => '#####@####.###', To => '#####@####.###', Subject => Encode::encode( 'MIME-Header-ISO_2022