- 229 名前：nobodyさん [2005/08/23(火) 05:30:59 ID:jskS7WB1]
- 質問です．
カウンターを制作しているのですが，counter.datにカウント数を記録するのに
「count=32」といったように「count=カウント数」といったように記録したいのですが，
#!/usr/bin/perl
# カウントファイルから読み込み
open(IN, "counter.txt");
$count = <IN>;
close(IN);
# カウント増加
$count++;
# カウントファイルに書き込み
open(OUT, "> counter.txt");
print READ "count=";
print OUT $count;
close(OUT);
っというところまではかけたのですが，読み込むときに，
「count=32」の数字だけを読み込んでカウントアップさせるには
読み込む部分をどのように書き直せばよろしいでしょうか？
初歩的な質問になってしまいましたが，すみませんがよろしくお願いします．
