需求比较简单,因为svn库比较小,才10多个g,每天定时备份一个全量的svn文件,上传到另外一个服务器上就可以了,
(按照周一到周五自动备份,然后ftp上传覆盖更新)
1、先创建一个svn.pl备份脚本,内容如下:
#!/usr/bin/perl -w
my $svn_repos="/var/svn/svnrepos";
my $backup_dir="/var/svn/svnrepos";
#my $time=$(date +%Y%m%d:%H:%M:%S);
#my $next_backup_file = "svn".$time;
#按照星期几当文件后缀,
#my $next_backup_file = "svnback.".`date +%Y%m%d`;
my $next_backup_file = "svnback.".`date +%u`;
#my $svnadmin_cmd="svnadmin dump --revision $youngest $svn_repos >$backup_dir/$next_backup_file";
#'$svnadmin_cmd';
my $svnadmin_cmd="svnadmin dump $svn_repos >$backup_dir/$next_backup_file";
`$svnadmin_cmd`;
open(LOG,">$backup_dir/last_backed_up"); #记录备份的版本号
print LOG $next_backup_file;
close LOG;
#如果想节约空间ÿ