backups sicher kopieren mit sftp!
Posted: 2003-01-17 12:23
eine sichere lösung....
auch ich mache jeden nacht backups auf meinen rootserver von datenbank, /home usw.
auf meiner home maschine läuft ein perl-script, welches die erstellten backup-datein kopiert.
benötigtes perl-module Net::SFTP
zu installieren mit:
12:05:01:chris@chris:~ > perl -MCPAN -eshell
cpan> install Net::SFTP
alle abhängigkeiten müssen aufgelöst werden!
auch ich mache jeden nacht backups auf meinen rootserver von datenbank, /home usw.
auf meiner home maschine läuft ein perl-script, welches die erstellten backup-datein kopiert.
benötigtes perl-module Net::SFTP
zu installieren mit:
12:05:01:chris@chris:~ > perl -MCPAN -eshell
cpan> install Net::SFTP
alle abhängigkeiten müssen aufgelöst werden!
Code: Select all
#!/usr/bin/perl
##
## sftp.pl
##
## (c) 2003 haase, www.haase.net
## chris@haase.net
##
## Christian Haase, Fre Jan 17 11:42:03 CET 2003
##
## $Id: $
##
## crontab:
## 30 4 * * * /usr/local/bin/sftp.pl >> /dev/null 2>&1
use warnings;
use strict;
use Net::SFTP;
my %args = (
user => 'web2',
password => 'passwort',
debug => 0
);
my $tag = `/bin/date +"%s"`;
chomp($tag);
my $datum = `/usr/bin/expr $tag / 86400`;
chomp($datum);
my $sftp = Net::SFTP->new("sftp.haase.net", %args);
my $remote = "/home/www/web2/bachup/mysqli". $datum .".tar.gz";
my $local = "/tmp/mysql" . $datum .".tar.gz";
$sftp->get($remote, $local);
my $remote2 = "/home/www/web2/bachup/datei". $datum .".tar.gz";
my $local2 = "/tmp/datei" . $datum .".tar.gz";
$sftp->get($remote, $local);
# usw.
print "fertign";
