copy tail output to an external file in perl

Shell Programming and Scripting
1

The below code works to tail client.log file. but I want to copy the output into an external file /home/tail.txt

Can anyone please help.

#!/opt/bin/perl -w
open my $pipe, "-|", "/usr/bin/tail", "/var/log/client.log" or die "could not start tail on /var/log/client.log : $!";
print while <$pipe>;
2 
#!/opt/bin/perl -w
open my $pipe, "-|", "/usr/bin/tail", "/var/log/client.log" or die "could not start tail on /var/log/client.log : $!";
open (FW,">","/home/tail.txt");
print FW while <$pipe>;
close(FW);
3

Pravin27....It works great Buddy! Thanks a lot.