此Linux下的自動執行分段備份腳本需添加到/etc/crontab,是每天執行一次腳本自動進行分段備份/www/users目錄下的網頁文件夾.
從事行業不同，僅供參考
#!/usr/bin/perl
$all_day = `date`;
chdir "/www/users/";
@all = <*>;
@all = sort @all;
$aaa = @all;
if ($aaa%7==0)
{
$x = int($aaa/7);
}
else
{
$x = int($aaa/7)+1;
}
#print "$aaa\n";
#print "$x\n";
if ( $all_day =~ /^Mon/)
{
print $all_day;
for ($i=0;$i<$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Tue/ )
{
print $all_day;
for($i=$x;$i<2*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Wed/)
{
print $all_day;
for($i=2*$x;$i<3*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Thu/)
{
print $all_day;
for($i=3*$x;$i<4*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Fri/)
{
print $all_day;
for($i=4*$x;$i<5*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Sat/)
{
print $all_day;
for($i=5*$x;$i<6*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
}
elsif ( $all_day =~ /^Sun/)
{
print $all_day;
for($i=6*$x;$i<7*$x;$i++)
{
system "tar czvf /backup/wwwbackup/$all[$i].tar.gz $all[$i] 2> /dev/null";
}
