ドメイン差し押えられた後の2ch接続方法 (373レス)
前次1-
抽出解除 レス栞

40
(4): its [sage] 2007/01/13(土) 15:23:40 AAS
>>36
36(5): 名無しさん@お腹いっぱい。 [sage] 2007/01/13(土) 15:11:23 AAS
>>16
途中までなら作ったリストがあるから、使えそうだったらソースコピーして使ってくれ
外部リンク[html]:wirbelwind.jp
bbsmenu.htmlを同じフォルダに保存してから実行すると
IP版のリンクを作るスクリプト試作したお

open(BBSMENU, "bbsmenu.html");
open(IPMENU, ">ipmenu.html");
while (<BBSMENU>) {
if ($_ =~ /HREF=http:\/\/([a-z0-9]+)\.2ch\.net\/([a-z0-9_-]+)\/\>(.+)\</) {
$host = "$1.2ch.net";
$addr = (gethostbyname($host))[4];
$addr = sprintf("%u.%u.%u.%u", unpack("C*", $addr));
$url = "http://$addr/~ch2$1/$2/";
print IPMENU "<A HREF=$url>$3</A><br>\n";
} else {
print IPMENU;
}
}
close(BBSMENU);
close(IPMENU);
44: 名無しさん@お腹いっぱい。 [sage] 2007/01/13(土) 15:34:29 AAS
>>40
管理者権限のないPC(例えば大学の共有PCとか)の人もいるんジャマイカ?
方法がたくさんあるのは、自分に合った方法が選べるから、メリットと思うよ。
46
(1): 32 [sage] 2007/01/13(土) 15:41:08 AAS
ステキスクリプトが登場したので作業再開したいところだけど野暮用入ったので手が付けられず。
>>16
16(4): 11 12 [sage] 2007/01/13(土) 14:26:31 AAS
>>15
同じように
外部リンク:207.29.227.55
とういうように
http://(鯖IP)/~ch2(ex17とかのあれ)/(フォルダ名)/
ていう風に指定すると直打ちでみれま

今から直打ちverのbbsmenu作ってきま
に期待!!!!!!

>>40
うおっwwまぶしっwww
GJ!!!!!!!!!!!!

>>43
43(2): 名無しさん@お腹いっぱい。 [] 2007/01/13(土) 15:29:57 AAS
改変bbsmenuユーザと改変hostsユーザが混在すると混乱する予感。
設定してしまえば他は同じなhostsのがスマートなやり方な気がする
確かにhostsの方がスマート。
でも、ユーザの使い方次第ではbbsmenuもあってもいいかな、と思うんだ。
両方存在することで弊害が発生しないのであれば「どっち使ってもおk」とアナウンスしておけば大丈夫、かも。
49
(2): 名無しさん@お腹いっぱい。 [sage] 2007/01/13(土) 15:47:39 AAS
>>40
ってどうやって使用するんすか?
84: 名無しさん@お腹いっぱい。 [sage] 2007/01/13(土) 17:06:01 AAS
>>40のスクリプトをWinのActive Perlなんかで実行するヒントをちょっと書いておくよ。

1. >>40のスクリプトをテキストエディタにコピペ。

open(BBSMENU, "bbsmenu.html");  ←ここから
open(IPMENU, ">ipmenu.html");
      中略               ←途中省略してるよ。
close(BBSMENU);
close(IPMENU);              ←ここまで

2.コピペしたスクリプトの先頭(1行目)にPerlのパスを自分の環境に合わせて追加する。

#!C:\Program Files\〜\perl\bin\perl.exe  ←こんな感じで自分の環境に合わせて記述
open(BBSMENU, "bbsmenu.html"); 

3.適当な名前で「ip.cgi」などとしてCGI実行フォルダに保存する。

4.外部リンク[html]:menu.2ch.netのhtmlファイルをそのまま3のフォルダに保存。

5.ブラウザで3で保存したcgiファイルを呼び出し、しばらく待つ。

6.フォルダ内にipmenu.html が完成。

注意
外部のレンタルサーバなどでは、どんなトラブルが起きるかわからないので絶対に実行しないこと。
かならずローカルのPerl環境で実行して実験すること。
自己責任で実行すること。責任はだれもとらないよ。
前次1-
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.026s