7BBS は、一行掲示板に必要な入出力処理、ログローテート機能、 表示用の HTML を無理矢理七行に詰め込んだ CGI プログラムです。 ログは標準で 50 行まで保存されます。 手軽に設置できますので、内輪、睦言、備忘録など、 機能やセキュリティを気にされない方々に最も適しています。
一行の定義は 「79 byte 以内の文字列 + LF」 としています。
●パッケージは頁下方にて配布
#!/usr/local/bin/perl
@ARGV=$F='7bbs.log';@l=<>;if(read STDIN,$_,512){y/+/ /,s/%([\da-f]{2})/pack"H2"
,$1/egi,s/["&<>]/&#${\ord$&};/g,y/\0- \x7F/ /s,for($n,$w)=(split/[&=]/)[1,3];
open F,">$F";eval{flock F,2};print F@l=("[${\substr localtime,4,15}] $n> $w"
."<br>\n",@l[0..48])}print join('><input name=',"Content-Type: text/html;chars"
."et=EUC-JP\n\n<title>7BBS</title><form action='$ENV{SCRIPT_NAME}' method=post"
,n,w,"s type=submit></form>\n"),@l
●ご注意: 当サイトにて公開されている製作物の作者は、 それら製作物の使用で生じた如何なる損害に対しても責任を負いません。 また、製作物やその利用方法に関する質問、製作物に対する要望等に、 作者は応える義務を持ちません。
● 当サイトにて公開されている製作物は、それぞれの作者が著作権を有します。 配布パッケージのライセンス文書に従ってお取り扱い下さい。 配布パッケージが存在しない場合は、作者の許諾なしに転載・再配布等は行えません。
● 当サイトは大塚製薬及び同社の製品とは一切関係ありません。 :-p