ftp shell script

[ccc]

hi

Habe linux server SuSE 8.2 prof. am laufen.
Ich soll ein ftp shell script schreiben
und zwar es wird via ftp zu einem anderen internen server eingeloggt,
alle files mit anfangs buchstaben sn* holen,
lokal als sichercheit abspeichern,
auf dem server geholte files löschen und zu einem anderen externen server via ftp schicken.

eine kleine vorlage würde mir da sehr weiterhelfen.

gruss
ccc

[samsara]

Kannst Du Perl?

#!/usr/bin/perl -w

use Net::FTP;
                                                                                                                             
my $username = "user";
my $password = "password";
my $remote_dir = "mysite_files/html";
my $remote_log_dir = "../logs";
                                                                                                                             
my $local_dir = "/home/samsara/hp/";
my $local_log_dir = "/home/samsara/hp_logs/";
chomp (my @localfiles = `ls $local_dir`);
                                                                                                                             
my $ftp = Net::FTP->new("www.meineseite.de") || die "Can't connect: $@\n";
$ftp -> login($username, $password) || die "Couldn't login.";
$ftp -> cwd($remote_dir);
my @remotefiles = ($ftp -> ls);
print "@remotefiles\n";
                                                                                                                             
foreach (@localfiles) {
        $ftp->put($local_dir.$_);
}
                                                                                                                             
# now fetch the logfiles
#$ftp -> cwd($remote_log_dir);
#my @logfiles = ($ftp -> ls);
#
#foreach (@logfiles) {
#       $ftp->get($_, $local_log_dir.$_);
#}
                                                                                                                             
# and quit
$ftp->quit;

[ccc]

vielen herzlichen dank !