10人か。
一桁を見た事ある？

> > ,には\つける必要ないよ。
> > /に\付ける理由は（正規表現を挟む物をデリミタっていうんだけど）
> > つけないと、デリミタを区別が付かないから。
> > デリミタを変更することが出来て、その時はmをつける。
> > 嘘だな(;´Д`)
> > //がm//の略記っていった方が正確なのかなぁ。
> > #にしたときには\#としないとﾀﾞﾒ。
> > さっき出てた s/http:\/\/// とか分かりづらくなるときに
> > s#http://##と出来て、わかりやすい。
> > つかこういうことっすね
> > foreach (@DATA) {
> > 	s#(http://[^/]+)(?:/[^/]+){2}(/.*)#$1$2#;
> > }
> > print "Content-type: text/html\n\n";
> > print map { $_.'<br>' } @DATA;
> > 正規表現使っちゃってるけど・・・
> 長文ｻﾝｸｽｺなんだが
> これはかなり理解出来ない
> 例えばこの場合だと
> @value = split(/\//,$line);
> @value = split(#/#,$line);
> のように置き換えることが可能っていうことかい？
> リンゴとみかんで頼む

再び『初めてのPerl』から引用。

多数のスラッシュを含むようなパターンでは、\を挿入する手間もバカになりません。
そこでPerlではスラッシュ以外の文字もデリミタとして使うことが
出来るようになっています。それにはmの直後にアルファベット以外の任意の
文字を置き、その次にパターンを書いて、最後に同じデリミタをもう一つ置くだけです。
たとえば次のようにします。

/^\/usr\/etc/ # 標準ではスラッシュがデリミタになる
m@^/usr/etc/  # '@'をデリミタにする
m#^/usr/etc/  # '#'をデリミタにする

あえてやりたいのなら、スラッシュを使ってm/abc/と書くことも可能です。
実は普通のマッチ演算子の正体はm演算子で、デリミタにスラッシュを使うときに限って
mを省略できるのです。


わかったかい？童貞ボーイ。
最後のforeachからは、俺ならこう書くってだけで・・・説明いる？

参考：2000/11/03(金)16時00分22秒

ﾏﾊｰｳﾞｨｰﾗ

ﾏｸﾀﾞｰﾅﾙﾄﾞの休日倍額バーガー食ってたらお腹痛くなってきた

裏ニュース君まだいる？
donutの記事書いてるのはどっちの方よ。

> > 例えばこの場合だと
> > @value = split(/\//,$line);
> > @value = split(#/#,$line);
> > のように置き換えることが可能っていうことかい？
> > リンゴとみかんで頼む
> やってみればわかる

Internal Server Errorになったよ
そのまま置き換えるだけでは駄目だよね


参考：2000/11/03(金)16時08分48秒

> 例えばこの場合だと
> @value = split(/\//,$line);
> @value = split(#/#,$line);
> のように置き換えることが可能っていうことかい？
> リンゴとみかんで頼む

やってみればわかる


参考：2000/11/03(金)16時00分22秒

Downloaded a total of 213,140 files
Downloaded a total of 85,744M bytes
Allocated Memory: 2,295,556 bytes
USER Resource: 59%
GDI Resource: 74%