メールの送信先が(**@ne.jp)で送信されるメールの本文にカウンターのcgiのソースデータ
を掲載させたいのですがカウンターまでしか作成できず困っています。。。
以下が作成したカウンターのCGIですここからどうすれば良いのかさっぱり分からず困っています。
どなたか宜しければソースを完成させて頂けないでしょうか。お願いします<(_ _)>
カウンターのcgi
#!/usr/local/bin/perl
# 読み書きモードでファイルオープン
# オープンできないときは強制終了
open(COUNT, ”+<countdata”) || die ”File ’countdata’ Open Error.”;
# ファイルをロックする
flock(COUNT, 2);
# ファイルから一行読みこむ
$counter = <COUNT>;
# カウントアップ
$counter_new = $counter + 1;
# ファイルポインタを先頭に戻す
seek(COUNT, 0, 0);
# ファイルに出力=書き込み
print COUNT ”$counter_new¥n”;
# ファイルクローズ
close(COUNT);
# ファイルロックを解除する
flock(COUNT, 8);
http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/pe_k09.htm
CGI-Perl 基礎編 (その九) 電子メール送信 sendmail (jcode.pl 要) - SAK Streets
perl、ですよね?
このあとに$counter_newがキリ番かを判定して、キリ番ならメールを送る、という仕組みを書けばよいのです。
リンク先にsendmailを用いた方法が載っていますので、適宜書き換えれば動くはず。
(要sendmailですが・・)
一度に全てを解決しようとせず、
1つ1つ潰していけばよいのではないでしょうか。
このソースってどこにあったんでしょう。
書籍かな?
回答者 | 回答 | 受取 | ベストアンサー | 回答時間 | |
---|---|---|---|---|---|
1 | ゆーな | 5回 | 2回 | 0回 | 2006-02-24 04:54:57 |
コメント(0件)