Shell Programming and Scripting

Hello,

Can you please help me one this:

I have two servers: Server A and server B.
Every day on 03.00AM in only one on these two servers (randomly)is generated one file, lets say file.txt.
I want to copy this file also to the other server.

I want to create a perl script that does this:
To see if the file file .txt that is generated is up to date.
If so, to copy this file to the other server.

Thank you in advance!!
Ervin

call the following script as a cron job @ 3:10 on each host:

Code:

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

my @stat=stat('path/to/file.txt');
if ($stat[9] > (time() - (60 * 60) ) ){ # last modified within an hour
   exec ('scp path/to/file.txt other.server:/absolute/path/to/file.txt'); #assuming you wish to replace the copy on the other node in the cluster
}

Thank you very much for replying!

Would you be so kind, and include also headers...also scp command?
Key exchanged is not a problem, servers are in cluster, and doesn need password to communicate.

Thank you!!!