toshinari.netCGI改造スレ　in ゴミ箱-ゴミ箱

toshinari.netCGI改造スレ　in ゴミ箱

↓ 1- 覧 板 20

1:名無しのパー速民
2007/02/03(土) 04:59:19.07 ID:bvdDK7co
toshinari.net
www.toshinari.net

本家改造板
cgi.toshinari.net

2:名無しのパー速民
2007/02/03(土) 05:14:01.99 ID:bvdDK7co
145 名前：荒巻＠中の人 ★[] 投稿日：2007/02/02(金) 00:20:57.91 ID:???
>>141

#おみくじ
if($in{'FROM'} =~ /\!omikuji/) {

以下略 AAS

3:名無しのパー速民
2007/02/03(土) 14:45:04.90 ID:WB53oaY0
sub get_time{
my($wtime,$now,$msec,$sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst,$date);
($wtime,$now,$msec,$sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
#小数点以下の時間を取得
use Time::HiRes;

以下略 AAS

4:名無しのパー速民
2007/02/04(日) 01:14:34.50 ID:ccg0BFs0
運用情報に立てて荒巻くんに教えてもらうってのが
手っ取り早かった気がするさ。

スレッドムーバーか運用情報に立て直すかしたらどーだろう、

5:名無しのパー速民
2007/02/04(日) 02:02:26.57 ID:ccg0BFs0
　　　　#IP規制
$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($host eq '' || $host eq $addr) {$host = gethostbyaddr(pack('C4',split(/\./,$addr)),2) || $addr;}
if($host =~ /123\.456\.789\.123/){

以下略 AAS

6:名無しのパー速民
2007/02/05(月) 01:55:40.90 ID:NxNpIzk0
$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($host eq '' || $host eq $addr) {$host = gethostbyaddr(pack('C4',split(/\./,$addr)),2) || $addr;}
if($host =~ /IP1|IP2|IP3|/){
error("規制されています");

以下略 AAS

7:名無しのパー速民
2007/02/05(月) 17:34:56.45 ID:5LWetZIo
その方法だと不便な希ガス

8:名無しのパー速民
2007/02/05(月) 23:49:23.41 ID:8IR4Wxs0

$host = $ENV{'REMOTE_HOST'};
$addr = $ENV{'REMOTE_ADDR'};
if ($host eq '' || $host eq $addr) {$host = gethostbyaddr(pack('C4',split(/\./,$addr)),2) || $addr;}
if($host =~ /123.456.789/){

以下略 AAS

9:名無しのパー速民
2007/02/05(月) 23:49:56.63 ID:8IR4Wxs0
htaccessからだと簡単だけど、
読むことすらできないってのも不便な感じだしね。

10:なすーん[なすーん]
なすーん
　　　　　　　　　　　　　　　　　　　　__　　　　　　､]l./⌒ヽ､　｀ヽ､　　　　 ,r'7'"´Z__
　　　　　　　　　　　　　　　　　　　　｀ヽ｀ヽ､-v‐'｀ヾﾐ| |/三ミヽ　　｀iｰr=<　　　　─ﾌ
　　　　　　　　　　　　　　　　　　　　＜　　／´　 r'´ 　 `　　　｀＼　　｀|　ﾉ　　　　 ∠_
　　　　　　　　　　　　　　　　　　　　｀ヽ､__//　 /　　 |/| ヽ __＼＼ヽ　　|く　　　___彡'′
　　　　　　　　　　　　　　　　　　　　｀`ｰ// 　 |_i,|-‐|　l ﾞ､ヽ　｀ヽ-､|!　　|　`ヽ=='´

以下略 AAS

11:名無しのパー速民
2007/02/06(火) 23:42:06.51 ID:kAJ21yg0
　　　　$nokori == 14 - $mday
if(length($in{'FROM'}) == 0){$in{'FROM'} = "残り$nokori日です";
}

こんな感じで残り何日ってできないか

12:名無しのパー速民[ブーン]
2007/02/07(水) 22:02:04.39 ID:⊂(^ω^)⊃
スレタテ規制のソースは？

13:名無しのパー速民
2007/02/08(木) 01:30:12.71 ID:UEzvSSg0
>>12
スレタテ規制ってどんなのなの？

14:名無しのパー速民
2007/02/08(木) 23:50:17.11 ID:SrdXfyQ0
ああ、
立てすぎ規制のことだよ。

15:名無しのパー速民[sage]
2007/02/10(土) 02:03:58.48 ID:Wv5Aj1ko
名無しランダムを考えてみる
&name;
$in{'MESSAGE'} =~ s//$name/g;

sub name {

以下略 AAS

16:名無しのパー速民
2007/02/10(土) 16:34:25.73 ID:IBWRMJA0
>>15
らめぇ板で実装されているアレですか？

17:名無しのパー速民
2007/02/10(土) 20:15:02.52 ID:R1zdbaw0
ていうかこのスレはらめぇ板の管理人がここからソースを盗むためのスレだと予想

18:名無しのパー速民[sage]
2007/02/10(土) 23:05:27.24 ID:Wv5Aj1ko
>>16
うん

19:名無しのパー速民[sage]
2007/02/11(日) 00:19:23.71 ID:lIHzERso
荒巻生存確認出来たけど、案の定このスレは着てないな

20:名無しのパー速民
2008/09/27(土) 18:39:36.19 ID:7lhrH9s0
IP取得ってどうすればいいかな？

20Res/7.33 KB

↑[8] 前[4] 次[6] 書[5] 板[3] 1-[1] l20

VIPサービス増築中！
携帯うpろだ|隙間うpろだ