やっつけなメール送信
http://d.hatena.ne.jp/srkzhr/20080221/1203599466
「件名」はFromやTo:と同じヘッダフィールドに入るため、文字コード変換 だけではダメで、さらにMIMEエンコードしてやる必要があります。
特にパフォーマンスを期待しないやっつけ仕事のときは、めんどくさいのでnkf使ってる。
use IO::All; my $subject = "件名"; my $body = "本文"; my $sendmail ="/usr/sbin/sendmail"; my $message = <<END_OF_MAIL; To: hogefuga\@gmail.com Subject: $subject $body END_OF_MAIL $message > io("|nkf -j -m0 |$sendmail -t -oi");