ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

CGI Perl総合

PC,ｽﾏﾎ,PHSは 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>4 > データファイルを読み込んで@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); > > こんな感じで組んだんですが、全然ダメで。。。 > どなたか教えてください。 >
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

ﾒﾓ帳

(0/65535文字)

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.006s