All pastes #483430 Raw Edit

Someone

public text v1 · immutable
·published 2007-05-11 18:53 UTC
rendered paste body
@files = <$svn_root>;

foreach (@files) {
        $next_backup_file = "weekly-full-backup-$_." . 'date +%Y%m%d';
        $youngest = 'svnlook youngest $svn_root/$_';
        chomp $youngest;
        print "Backing up $_ to revision $youngest\n";
        $svnadmin.cmd = "svnadmin dump --revision 0:$youngest $svn_root/$_ > $backup_dir/$next_backup_file"
;