use Net::SMTP;
$smtp = Net::SMTP->new('smtp.mail.yahoo.co.jp');
$smtp->mail('SENDERADDRESS');
$smtp->to('GETTERADDRESS');
$smtp->data("To: My Dearest User\r\n\r\nA simple test message.\r\nIs anything wrong?\r\n")
$smtp->quit;
exit;
c:\>perl -MNet::SMTP -e "$s=Net::SMTP->new('smtp.mail.yahoo.co.jp');$s->mail('SEND');$s->to('GET');$s->data(\"\nMessage\n\");$s->quit;"
このままではWinMEのMS-DOSプロンプトでは文字数制限に引っかかるんだな。一応の解決策としては、バッチファイル中にこのプログラムを書き込んで使うという方法なんだな。でもそんなことするくらいなら、plファイルに書き込んでおいて実行するほうがずっと賢いんだな。