Perlについての質問箱 3箱目
■ このスレッドは過去ログ倉庫に格納されています
0862855
NGNGopen(vote,"+<vote.log");
@votenum=<vote>;
$votenum[$num] = $votenum[$num] + 1;
seek(vote,0,0);
print vote @votenum;
close(vote);
実行結果はおなじでした。
例えば$numが2の場合、$votenum[2]がプラス1されて欲しいのに、
$votenum[1]が$votenum[1]*10+1されてしまいます。1が$votenum[1]の最後の
文字列に加わってしまう感じ。
>>858
$numはhtmlのformから取得されるようになってます。
>>859
すいません。わからないです・・。
>>860
えらそうだなんて侵害ですが、そう思われたのなら謝ります。
>>861
お願いします。一緒に考えてください。
■ このスレッドは過去ログ倉庫に格納されています