pellmellの日記: 王鈴に書置き
日記 by
pellmell
例のスクリプトのバグ修正完了。
修正個所は以下の通り。(diffの出力)
##pref.cgi##
19,21c19,20
< $taboo_endpage = 'http://foo.bar.jp/';
< $host = &gethost;
< #$host=$ENV{'REMOTE_HOST'} || $ENV{'REMOTE_ADDR'};
---
> #$host = &gethost;if($host=~/bmc/){$host="ppp753.master.ad.jp";}
> $host=$ENV{'REMOTE_HOST'} || $ENV{'REMOTE_ADDR'};
119c118
< $_ = &encrypt($_)."\n";
---
> $_ = &encrypt($_);
##log.cgi##
71,72c71,73
< &readlog;
< &tag if ($chat=~s/\t/</g);
---
> #&tag if ($chat=~s/\t/</g);
> @taboo = ('taboo');
> $taboo_endpage = 'http://foo.bar.jp/';
92c93
< $value = "<FONT COLOR=\"blue\"><B>エプロン娘</B></FONT> > <B><FONT COLOR=\"$color\" SIZE=+2>$name</FONT><FONT COLOR=\"red\">さんは禁句を口にしたので放り出されました。まった来てねっ☆</FONT></B><FONT COLOR=\"#888888\" SIZE=-1>($date $host)</FONT><HR>\n";
---
> $value = "<FONT COLOR=\"blue\"><B>エプロン娘</B></FONT> > <B><FONT COLOR=\"$color\" SIZE=+2>$name</FONT><FONT COLOR=\"red\">さんっ、おつかれでした。まった来てねっ☆</FONT></B><FONT COLOR=\"#888888\" SIZE=-1>($date $host)</FONT><HR>\n";
修正個所は以下の通り。(diffの出力)
##pref.cgi##
19,21c19,20
< $taboo_endpage = 'http://foo.bar.jp/';
< $host = &gethost;
< #$host=$ENV{'REMOTE_HOST'} || $ENV{'REMOTE_ADDR'};
---
> #$host = &gethost;if($host=~/bmc/){$host="ppp753.master.ad.jp";}
> $host=$ENV{'REMOTE_HOST'} || $ENV{'REMOTE_ADDR'};
119c118
< $_ = &encrypt($_)."\n";
---
> $_ = &encrypt($_);
##log.cgi##
71,72c71,73
< &readlog;
< &tag if ($chat=~s/\t/</g);
---
> #&tag if ($chat=~s/\t/</g);
> @taboo = ('taboo');
> $taboo_endpage = 'http://foo.bar.jp/';
92c93
< $value = "<FONT COLOR=\"blue\"><B>エプロン娘</B></FONT> > <B><FONT COLOR=\"$color\" SIZE=+2>$name</FONT><FONT COLOR=\"red\">さんは禁句を口にしたので放り出されました。まった来てねっ☆</FONT></B><FONT COLOR=\"#888888\" SIZE=-1>($date $host)</FONT><HR>\n";
---
> $value = "<FONT COLOR=\"blue\"><B>エプロン娘</B></FONT> > <B><FONT COLOR=\"$color\" SIZE=+2>$name</FONT><FONT COLOR=\"red\">さんっ、おつかれでした。まった来てねっ☆</FONT></B><FONT COLOR=\"#888888\" SIZE=-1>($date $host)</FONT><HR>\n";