質問です．
カウンターを制作しているのですが，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」の数字だけを読み込んでカウントアップさせるには
読み込む部分をどのように書き直せばよろしいでしょうか？

初歩的な質問になってしまいましたが，すみませんがよろしくお願いします．