なんだかだりぃ
ながくないかも

> 朝昼晩御飯
> 全部ステーキ

 肉屋か。

参考：2000/11/03(金)14時21分44秒

> > どうするよ？
> > http://www.lares.dti.ne.jp/~sawatari/france/coru980824.html
> 面白くなくて本当にごめんなさい。そろそろネタ切れです。

こんなのとかな
http://www.lares.dti.ne.jp/~sawatari/france/

参考：2000/11/03(金)14時38分49秒

> どうするよ？
> http://www.lares.dti.ne.jp/~sawatari/france/coru980824.html

面白くなくて本当にごめんなさい。そろそろネタ切れです。

参考：2000/11/03(金)14時27分02秒

どれみＤＶＤでも買ってくるか

Ｑ１：弦の張り替えがうまくできません。何かコツの様なものがあれば教えてください。
Ａ：まずは、トラウマレコーズ宛に、現金書留で１０万円送りなさい。お金が届き次第、”ギター弦張り替えマニュアル”を送ります。

Sense of guilt

> > 繰り返しの対象になるリストが1個の配列である場合には
> > ループ変数は値のコピーのかわりに配列の要素を直接参照しています。
> > これをかみくだいていえば、ループ変数の値を変更すると
> > それに対応する配列要素の値も同時に変更されることになります
> > 『初めてのPerl』より
> > foreach my $line (@DATA) {
> > 	$line = substr($line,7);
> > }
> > は
> > for ($i=0; $i<@DATA; $i++) {
> > 	$DATA[$i] = substr($DATA[$i],7);
> > }
> > と同じ。
> > myは説明が難しいな(;´Д`)
> > なくてもいいや。
> > 詳しくは本買ってくれ。
> なるほど
> 分かり易い説明ｻﾝｸｽｺ
> myについては必要になったら調べてみるよ
> つかもう一個質問があるんだがいいかい？
> split関数についてなんだが
> セパレーターを/として$lineの内容をそれぞれの行に代入したい
> ($1,$2,$3,$4,$5) = split(///,$line)
> ってやるとエラーだし
> $sep = '/';
> ($1,$2,$3,$4,$5) = split(/$sep/,$line);
> でも駄目だし
> この場合はどうやってやればいいのだろう

$1とかは他の時に使う変数だから使わないほうがいいな。
よって配列に入れよう。

@value = split(/\//,$line);

つかさっきの続きだと仮定すると、配列の最後の値が改行付きになるので
@DATAに代入した次の行で
chomp(@DATA);
して改行を除いたほうがいいな。
ついでに俺は/を使うときは
@value = split(m#/#,$line);
こうします。

参考：2000/11/03(金)14時19分08秒

同性愛について真面目に討論してみようぜ

ぷぷぷ　これであんぱんまんも　おしまいね

変数に$1のようなものは使えなかったのが原因のようだ
ｸｽｺ

どうするよ？
http://www.lares.dti.ne.jp/~sawatari/france/coru980824.html

どうして友枝は潰されてばっかりでまともに運営できてないのに
大御所サイトなんですか