sendまね～るを使ったメールの送信が出来ない

Question

windows serverでcgiを利用していてメール送信をする為に
sendまね～るを使おうと思いました。

コマンドプロンプトでsendまね～るの送信テストは出来たのですが
cgiから実行するとメールが送信されません。

送信テストが出来ていれば問題なのはcgiのほうでしょうか。
どこか記述が間違っておりますでしょうか。

sub my_sendmail($$$$) {
local ($from, $to, $subject, $body) = @_;
$subject = mimeencode( jcode'jis($subject) );
$body = jcode'jis($body);
open MAIL, "|C:/sendm/sendmane.exe -f $from -t $to";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n";
print MAIL "To: $to\n";
print MAIL "\n";
print MAIL "$body\n";
close MAIL;

perlのバージョンは5.18です。
宜しくお願いいたします。

Answer 1

使い方を間違っていると思われます。
コマンドを直接実行するのと基本的に同じだと思います。Perl上ではなく、コマンド上から同等のメール送信を試しているでしょうか？
-fオプションで直接メールアドレスを指定するならFromヘッダはいらないと思われます。
コマンドの最後に$toとありますが、Toヘッダでも同じものを指定するのは意味がないと思われます。
-fオプションでメールアドレスを指定せず(-fの後ろに$fromを指定しない)に、Fromヘッダを使用する場合は、Fromヘッダ上のメールアドレスを<>でくくる必要があるとの情報を見かけました。

Comments

[GIRLibra]

ありがとうございます。
記述を
open MAIL, "|C:\sendm\sendmane.exe $from $to
としたところ送信が確認出来ました。
ありがとうございました。