I want to make a script that have to take "get or mv" the tar file from another path. The script make a tar of the last periodic backup (PB). The PB have the same name with diferent date. When the script find the last PB make a tar and move the tar file in other path. Could some one help, please?

Hi,

Show us what you have written already, and where you are stuck.

Kind regards

For this part I haven't nothing, 'cause I have three machine. I take archives in one to put in another, 2nd one, for this I use a perl script. Then I want to take the periodic backup and put this in the same dir with the archives that came from 1st machine. Then I'll make a tar of this dir and put in the 3rd machine. I just make an experience using "find -mtime", but is not what I looking for.

$ftp = Net::FTP->new($ftp_server1, Passive => 1) or die "unable to connect: $@\n";
$ftp->login($ftp_uid1, $ftp_pw1) or die "unable to login: $@\n";
$ftp->cwd($ftp_dir) or die "Cannot change working directory ", $ftp->message;
$ftp->binary;

$ftp->get($ftp_file1) or die "Cannot list directory ", $ftp->message;
$ftp->get($ftp_file2) or die "Cannot list directory ", $ftp->message;

$ftp->quit;

Well, that code looks basically ok; what happens when you run it?
Obviously it needs some code to get/set vars first, but just to test you can hardcode them.

I didn't put all the code. but I set vars first. But this script is only to get the files there need to put in the 2nd machine using FTP. Now I want to tar the last periodic backup and move it to some directory. Could some one help. how can I do it?

If you want to do it purely in Perl, try this module http://search.cpan.org/~bingos/Archi...Archive/Tar.pm
Otherwise, you could make an external call with qx or system http://perldoc.perl.org/perlop.html#...Like-Operators or try open2 & open3 http://perldoc.perl.org/IPC/Open2.html or try 'piped open' http://perldoc.perl.org/perlipc.html...%28%29-for-IPC

no, I don't want to make it using perl, I want to use shell script, 'cause my machine is using an old solaris version and in perl archives I don't have the tar.pm... I made a download of it and put it in the right directory, but is not working...