メルマガに自動的に購読させてしまうCGI (52ﾚｽ)
上下前次1-新

---

4(1): [ggg@aa.ne.jp] 02/06/20 01:50 ID:??? AAS
sendmail のパスはサーバによって違うが、
大体したのような感じ

sub sendmail{
my ($title,$from,$to,$contents) = @_;
my $mail_title = "";

$mail_title = $title;
$mail_title = &jcode::sjis($mail_title);
while ($mail_title =~ /\n$/){
$mail_title =~ s/\n$//g;
}
$mail_title = &jcode::jis($mail_title);

open(MAIL,"|/usr/lib/sendmail $to");
print MAIL "Content-Type: text/plain; charset=ISO-2022-JP\n";
print MAIL "Content-Transfer-Encoding: 7bit\n";
print MAIL 'Subject: '.$mail_title." \n";
print MAIL "From: $from\n";
print MAIL "To: $to\n\n";
print MAIL "$contents\n";
close(MAIL);
}

---

上下前次1-新書関写板覧索設栞歴

---

あと 48 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.247s*