Problem in opening the file using Tail Module

[sivasakthi]

Hi Guys,

I have used the  following code to print the log files. but nothing is
printed  even it doesn't show the warning message,  no prompt is
returned.
what is the mistake in code , could u help me to find the pbm???

#!/usr/bin/perl
use strict;
use warnings;

use File::Tail;
my $file=File::Tail->new("/some/log/file/path"); 
while (defined(my $line=$file->read))
{
print "$line";
}


Thanks,
Siva