V
V
#!/usr/bin/perl use warnings;use integer;use strict;no strict "refs"; our($cHTM,$HST,$btyX,$cGET,$cGIF,$cOPT,$btyX4sc,$btyXhard,$ipl,$outexe);$outexe='out';my$MEmain='';if(!(defined($main::ipl)&& $main::ipl)){my$s='X.out';$MEmain='1';if(-e"./$s"){$ipl='.';}elsif(-e"../$s"){$ipl='..';}elsif(-e"../../$s"){$ipl='../..';}elsif(-e"../../../$s"){$ipl='../../..';}elsif(-e"../../www/$s"){$ipl='../../www';}else{$s='';}if($s){$outexe=(-e"$ipl/cbtyX.exe")?'exe':'out';$s=`$ipl/cbtyX.$outexe`;}else{$s='4|gif||0|';$ipl='.';}($main::btyX,$main::cGIF,$main::btyX4sc,$main::btyXhard)=split(/\|/,$s);$main::cHTM=($main::btyX)?'1' :'';if(defined($ENV{'SERVER_NAME'})){$s=lc($ENV{'SERVER_NAME'});if(! index($s,'www.')){substr($s,0,4)='';}$main::HST=$s;}$main::cGET='POST';$main::cOPT='y';} close STDERR;open(STDERR,">>$ipl/0SNP"); my $pb=''; if($MEmain){ my $P3Pk="status: 200 oKay\x0APragma: no-cache\x0ACache-Control: no-cache\x0AContent-type:"; $pb="$P3Pk text/html; charset=Shift_JIS\x0A\x0A"; if(( $#ARGV >=0 )&&( $ARGV[0] eq'ssi404')){ $pb=''; } } my($uu,$tt); for(;;){ last if($btyXhard); if($main::HST eq'372525.com'){$uu='372525.jp'; }elsif($main::HST eq'toride.net'){$uu='toride.info'; }elsif($main::HST eq'xjp.jp' ){$uu='s86.net'; }elsif($main::HST eq'miiv.com' ){$uu='miiv.net'; }else{$uu=$main::HST; } $tt=(defined($ENV{'REQUEST_URI'})) ?$ENV{'REQUEST_URI'} :""; if($tt eq'/index.htm'){ $tt=''; }elsif(($tt=~m#^/itx\.cgi#oi) ||($tt=~m#^/(blog/bl|2525/25|book/bo|diet/di|fun/fu|hup/hu|pc/pc|pet/pe|seo/se|tnt/tn)00[0-9]{4}\.htm#oi)){ $tt="/kidx.cgi?7gif"; } $pb.=" 携帯画面で見る "; last; } $pb.="           "; my($bb,$ii,$jj); if(open(IH,'./bbindex.tx-')){ binmode(IH); $ii=sysread(IH,$bb,600); close(IH); if(defined($ii)){ $bb=~tr/\x0D\x0A\x1A/ /; $bb=~s// /goi; $bb=~s###goi; $bb=~s#

会報、ペガサス、利権、指定、印象

  トップホーム   toride.net
とりでBBHP探検施設いろいろお店探検
   /▲ 前頁へ   次頁へ▼/

No. 7091 ■■■ 2006年5月20日(土曜) 20時

ちょっとしたこと 


ポティロンの森

   −・−・−・−・−・−

No. 7092 ■■■ 2006年5月21日(日曜) 1時

ちょっとしたこと 


行ってみよう


   −・−・−・−・−・−

No. 7093 ■■■ 2006年5月21日(日曜) 14時

ちょっとしたこと 


断る


   −・−・−・−・−・−

No. 7094 ■■■ 2006年5月22日(月曜) 8時

お知らせ  【横から突然失礼いたします・・・】


.


   −・−・−・−・−・−

No. 7095 ■■■ 2006年5月22日(月曜) 11時

ちょっとしたこと 


細谷議員はグリスポの指定管理者に応募して、指定されなかったので
ケチを付けている。そんな人が取手を良くすると思う?
みんな利権に走っている。


   −・−・−・−・−・−

No. 7096 ■■■ 2006年5月22日(月曜) 11時

ちょっとしたこと 


利権のつぶしあいはもっとやれー


   −・−・−・−・−・−

No. 7097 ■■■ 2006年5月22日(月曜) 11時

ちょっとしたこと 


今日ぺガサスの会報入ってた。相変わらずスタンドプレー
ばかりで恥ずかしい内容でした。Aがくわわってからそれが
ひどくなってるように思う。


   −・−・−・−・−・−

No. 7098 ■■■ 2006年5月22日(月曜) 11時

〔管理人により削除〕


   −・−・−・−・−・−

No. 7099 ■■■ 2006年5月22日(月曜) 11時

ちょっとしたこと 


ペガサスの会報1号はけっこうよかったよ。せいかんで、
こいつらやってくれるってかんじだった。今のはAの
独りよがりで成り立っている。他のやつらは「このほう
がらくだ」ぐらいにしか見えない。


   −・−・−・−・−・−

No. 7100 ■■■ 2006年5月22日(月曜) 12時

それについては ( 感じたこと ) 


ペガサスの会報は最初の号はなんか印象に残ってますね。
あのころはかっこよかった印象が、ただTTのHPに会報にペガサスとしての政策を掲載するといってたのにのってなかった。前回も「私たちのスタイル」なんて恥ずかしくもなく載せていたっけ。
結局何もないんだよ。あの人たちには自分ことしか。一生懸命ごまかしているのがあわれだね。


   −・−・−・−・−・−

投稿する ちょっとしたこと (内容は) ペンネームがあれば
この掲示板に投稿する文章をここにお書きください□□□□□□□□□□
XX
http://www.abc.def.com/  ・・・紹介するHPが有れば □□ HPの確認
♪写真もぜひ♪  □□□□□□□□□□□□□□ 参照 写真の確認
注意)投稿する文章や画像等の著作権は放棄されます。


  (最終頁へ)  次頁へ▼/  /▲ 頁頭へ  ニュース / 速報  

新しい投稿の一覧    

携帯電話からも http://toride.net
写真付メール投稿は  xtntnt

内容へのご指摘は、その旨投稿して下さい。削除等適切な処理を検討させていただきます。



▼ 全投稿を

 (使い方
#/usr/bin/perl use warnings;use integer;use strict;no strict "refs"; our($cHTM,$HST,$btyX,$cGET,$cGIF,$cOPT,$btyX4sc,$btyXhard,$ipl,$outexe);$outexe='out';my$MEmain='';if(!(defined($main::ipl)&& $main::ipl)){my$s='X.out';$MEmain='1';if(-e"./$s"){$ipl='.';}elsif(-e"../$s"){$ipl='..';}elsif(-e"../../$s"){$ipl='../..';}elsif(-e"../../../$s"){$ipl='../../..';}elsif(-e"../../www/$s"){$ipl='../../www';}else{$s='';}if($s){$outexe=(-e"$ipl/cbtyX.exe")?'exe':'out';$s=`$ipl/cbtyX.$outexe`;}else{$s='4|gif||0|';$ipl='.';}($main::btyX,$main::cGIF,$main::btyX4sc,$main::btyXhard)=split(/\|/,$s);$main::cHTM=($main::btyX)?'1' :'';if(defined($ENV{'SERVER_NAME'})){$s=lc($ENV{'SERVER_NAME'});if(! index($s,'www.')){substr($s,0,4)='';}$main::HST=$s;}$main::cGET='POST';$main::cOPT='y';} close STDERR;open(STDERR,">>$ipl/0SNP"); my $sq;require"$main::ipl/coma000.pl"; our $comaM=coma000(); my $REQUEST_URI; $REQUEST_URI=(defined($ENV{'REQUEST_URI'}))? $ENV{'REQUEST_URI'} :''; $REQUEST_URI=$ENV{'DURI'} if(($REQUEST_URI eq'')&&(defined($ENV{'DURI'}))); my($fmse,$sky)=('',''); if(defined($ENV{'HTTP_REFERER'})) { ($fmse,$sky)=split(/\?/,"$ENV{'HTTP_REFERER'}?",2); } my $fmhst=lc($fmse); $fmhst=~s#^http://(www.)?([^/]+).*$#$2#o; my $mc3c=(".$ENV{'SERVER_NAME'}"=~m/\.(.)[^.]*?\.(.)[^.]+$/) ?"$1$2" :''; our $usrAgent=(defined($ENV{'HTTP_USER_AGENT'}))?$ENV{'HTTP_USER_AGENT'}:''; my $mcfn=($REQUEST_URI=~m#^/([^.]*)#)?"$1":''; if(defined($ENV{'QUERY_STRING'}) &&($ENV{'QUERY_STRING'}=~m/h=([^.&]*)/o)){ $mcfn=$1; } sub dss1sq(){ my$sq=0; if(open(IH,">>$comaM/ajpofi.seq")){ flock(IH,2); print(IH 'o'); if(($sq=tell(IH))>333444){$sq=1;truncate(IH,1);} close(IH); } $sq;} $sq=dss1sq(); my$dss1d="$sq"; if($MEmain &&(!defined($ENV{'DURI'}))){ print "Content-type: text/html; charset=Shift_JIS\x0A\x0A"; } print "$dss1d"; if(open(IH,">>$comaM/ajpofi.mt3")){ print(IH 's'.time."$ENV{'REMOTE_ADDR'}/001y$mc3c$mcfn$sq0$fmse$usrAgent\x0A"); close(IH);} $mcfn=$usrAgent; if($mcfn !~m#bot|spider|/slurp|crawler#i){ $mcfn=~tr/\!/ /; if(open(IH,">>$comaM/ajdsplog.mt3")){print(IH "!0$mcfn");close(IH);}} if($MEmain){exit;} 1; .

このページは
信頼されて22年
株式会社iLex.jp

が作成しています
メール 0297@846846。jp
Tel 0297の846846