はてブのほうでちょろっと書いたんだけど、 Mail::Sendmail でメール送信の以下のコードについて。 use Encode; use utf8; my $subject = "テスト"; my $message = "テストです。ほげほげ。"; foreach my $str ( $subject, $message ) { utf8::encode($str); Encode::from_to( $str, "utf8", "iso-2022-jp" ); } ここでutf8::encode => Encode::from_toするのは冗長 encode('iso-2022-jp', $str); だけでおｋ。 use utf8してなければ（で、ソースの文字コードがutf8であれば) Encode::from_to( $str, "utf8", "iso-2022-jp" )
