ime.nuってどうなっているの？at PHPime.nuってどうなっているの？ - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト109:108 03/11/03 23:56 #!/usr/local/bin/perl $r=$ENV{'REQUEST_URI'}; print "Content-type: text/html; charset=Shift_JIS\n\n"; print "<html><head><title>テスト</title></head><body>"; if (!$r =~ /http:\/\//i) {print "直接呼ぶな</body></html>\n";exit;} $r =~ s|/||; print qq(他のサイトにJunp ==>> <A HREF="$r">$r</A>); print "</body></html>\n"; ごめん変わってなかった。 if (!$r =~ /http:\/\//i) 110:nobodyさん 03/11/29 17:44 .htaccess ErrorDocument 404 /jump.cgi jump.cgi #!/usr/local/bin/perl $url = $ENV{'REQUEST_URI'}; $url =~ s|/||; if($url =~ /http:/ ) { $url = "$url"; }else{ $url = "http://$url"; } print "Content-type: text/html\n\n"; print "<html><head><title>jump</title></head><b>"; print "<a href=$url>$url</a></b><br>別のサイトにジャンプしようとしています。"; print "宜しければ上記のリンクをクリックしてください<br><hr>\n"; print "広告\n"; print "<hr>広告のお問い合わせはad\@marsa.org<p align=\"right\"><i>"; print "<a href=http://ime.marsa.org>Powered by Marsa</a>031121</i></p>\n"; 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch