perl에서 파일핸들 참조해서 특정값 추출시

파일핸들로 참조한 파일에 특정열을 찾아서 특정열에서 일정값을 뽑은 후에 또 다른 파일에서 다른 값을 뽑을려고 참조하려는데 잘 안됩니다.

my $file = '/home/mrtg/www/bd/192.168.10.1_1001.html';
open( F, $file ) || die "Oops! $!";
seek( F, -4592, 2 );
my $line = <F>;
my $value = substr( $line, 2, 5 );
my $num = '1:1';

if ( $value > 50 )
{
&do_page ("bd_$num traffic $value ");
}

close F;

my $file3 = '/home/mrtg/www/bd/192.168.10.1_1003.html';
open( F, $file ) || die "Oops! $!"; <-- 이곳이 문제인것 같은데요... $file3
seek( F, -4592, 2 );
my $line3 = <F>;
my $value3 = substr( $line3, 2, 5 );
my $num3 = '1:1';

if ( $value > 50 )
{
&do_page ("bd_$num traffic $value ");
}

close F;

이렇게 작성하고 난 후에 다음 페이지를 참조하여 위와 같은 값을 얻어내려고 다시 위와 같이 반복(파일명과 변수명을 변경)하였으나 첫번째 값만을 가져오고 두번째 값을 가져오지 못합니다. 무엇이 문제인지 고수님들 봐주시면 감사하겠습니다.