ファイルの読み込み＆書き込みについて
読み込むファイルの中身
--------
1
data
--------
やりたいこと＝最初の数字を抜き出して、数字を足して、データを上書き
つまりこんな感じに
--------
2
data
data
--------
書いてみたもの（失敗）
--------
open (IN, "$outputFILE");
@tes = <IN>;
close (IN);

$tes = $tes[0];
$tes++;
$tes[0] = $tes;

open (OUT, ">$outputFILE");
print @tes;
close (OUT);

open (OUT, ">>$outputFILE");
print OUT "data\n";
close (OUT);
--------
アドバイスおねがいします！！！