ちょっと教えてください。
単純にファイルから数字を読んで、1足して書き込むようなプログラム
(アクセスカウンタみたいな感じ)を作りたいのですがうまくいきません。
どうやら読み書き両用オープンがうまくいってないみたいなんです。

open(FILE,"+> data.txt");
$x=<FILE>;
print $x;
exit;

試しに上のようにすると、なぜか何も標準出力に出力されません。

open(FILE,"data.txt");
$x=<FILE>;
print $x;
exit;

これだと、ちゃんとファイルの中身が標準出力に出力されます。

どうしてなんでしょう？
環境は WINDOWS XP ＋ Active Perl です。
よろしくお願いしますm(_ _)m