CGI Perl総合 (461ﾚｽ)
上下前次1-新

---

4(2): obj [sage ] 2001/03/16(金)00:46 AA×
>>0>>5>>3>>9>>3>>0>>5>>4>>9


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
4: obj [sage ] 2001/03/16(金) 00:46 データファイルを読み込んで@LINESという配列に入れたとします。 配列の中身は '23<>a<>0','26<>b<>5','14<>c<>3','30<>d<>9' だったとして、$xxという変数にa〜dのいずれかの文字が入ります。 例えば$xxにcが入ったらcという要素を含む3要素目の'14<>c<>3' の3を1増減、4にして '23<>a<>0','26<>b<>5','14<>c<>4','30<>d<>9' になった配列をデータファイルに上書き保存したいのですが どのように組めばよいのでしょうか？ open (IN,"hoge.txt") || &error('オープンエラー','指定された書込みファイルが開けません。'); @LINES = <IN>; close (IN); $i = "0"; foreach (@LINES){ ($t1,$t2,$t3)=split(/<>/,$_); if ($xx =~ /\Q$t2/) { last; } $i++; } $t3++; $all = $t1; $all .= '<>'; $all .= $t2; $all .= '<>'; $all .= $t3; $all .= '\n'; $LINES[$i] = $all; open (OUT,">$hoge.txt") || &error('オープンエラー','指定された書込みファイルが開けません。'); print OUT (@LINES); close (OUT); こんな感じで組んだんですが、全然ダメで。。。 どなたか教えてください。 http://mevius.5ch.net/test/read.cgi/hack/984669133/4
データファイルを読み込んでという配列に入れたとします 配列の中身は だったとしてという変数にのいずれかの文字が入ります 例えばにが入ったらという要素を含む要素目の のを増減にして になった配列をデータファイルに上書き保存したいのですが どのように組めばよいのでしょうか？ オープンエラー指定された書込みファイルが開けません オープンエラー指定された書込みファイルが開けません こんな感じで組んだんですが全然ダメで どなたか教えてください

---

上下前次1-新書関写板覧索設栞歴

---

あと 457 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.064s