Linux下的自动执行分段备份脚本

此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”;
}