メルマガに自動的に購読させてしまう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);
}
11: 02/06/20 10:39 ID:??? AAS
>>9
も ち ろ ん 、 ダ メ で す 。
>>1>>4あたりは今すぐ回線切って首吊って氏んで下さい。
---------------------------終了---------------------------
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.317s*