> pearlライスﾈﾀの続くこと続くこと・・・・


参考：2000/11/03(金)15時37分39秒

pearlﾈﾀの続くこと続くこと・・・・

裏ヌース君がｽﾙﾆｮﾝと現れているな・・・

> > $1とかは他の時に使う変数だから使わないほうがいいな。
> > よって配列に入れよう。
> > @value = split(/\//,$line);
> > つかさっきの続きだと仮定すると、配列の最後の値が改行付きになるので
> > @DATAに代入した次の行で
> > chomp(@DATA);
> > して改行を除いたほうがいいな。
> > ついでに俺は/を使うときは
> > @value = split(m#/#,$line);
> > こうします。
> なるほど
> 今回はchopはあえて使わなかった
> 最後にまた改行が必要になるかと思ってそのまま残しておいたよ
> 最終的にやりたかった事はURLの
> http://www.hogehoge.com/funga/fu/fugafuga/hoehoe.jpg
> を
> http://www.hogehoge.com/fugafuga/hoehoe.jpg
> にしたかった
> ただ、改行コードがブラウザで表示させると無効になるみたいだ
> テキストとして開くとキチンと改行されているんだけど
> ちなみに
> @value = split(/\//,$line);
> これっていうのは/のような特殊記号は\を前につけるといいってことだよね
> \,のように
> @value = split(m#/#,$line);
> これはどういう意味があるんだい？
> スクリプトは完成したよ
> かなりｻﾝｸｽｺ

,には\つける必要ないよ。
/に\付ける理由は（正規表現を挟む物をデリミタっていうんだけど）
つけないと、デリミタを区別が付かないから。
デリミタを変更することが出来て、その時はmをつける。
嘘だな(;´Д`)
//がm//の略記っていった方が正確なのかなぁ。
#にしたときには\#としないとﾀﾞﾒ。
さっき出てた s/http:\/\/// とか分かりづらくなるときに
s#http://##と出来て、わかりやすい。

つかこういうことっすね
foreach (@DATA) {
	s#(http://[^/]+)(?:/[^/]+){2}(/.*)#$1$2#;
}
print "Content-type: text/html\n\n";
print map { $_.'<br>' } @DATA;
正規表現使っちゃってるけど・・・

参考：2000/11/03(金)15時02分33秒

つかbaki.ne.jpは何故にこんなﾀﾞｳｿよ

12人か・・・・。