Perlコーディング初心者質問スレ Part 59

[0846 nobodyさん 2009/08/12(水) 14:33:18 ID:???]

この↓ようなモジュールないですかね？

use CGI::Sendmail;

my %mail = (
To => '[e-mail]',
Cc => '[e-mail]',
Bcc => '[e-mail]',
From => '[e-mail]',
Name => "ひろゆき",
Subject => "こんにちは",
Body => <<EOL,
お元気ですか？
では、さようなら
EOL
"Sendmail-path" => "/usr/sbin/sendmail",
"Character-code" => "euc-jp",
);

if ( CGI::Sendmail->new(%mail)->send ) { print "送信完了" }
else { print "送信できませんでした" }