一shell题
测试文件file是否存在，如果存在，则备份，生成新文件file，如果不存在，生成新文件file内容如下:
1 0 1
2 1 1
3 0 1
4 1 1
5 0 1
1 0 1
2 1 1
3 0 1
4 1 1
5 0 1
作者: mysqllog 发布时间: 2011-06-10
郁闷，当时在TX的时候，居然没想出来：
#!/usr/bin/perl
for($i=1;$i<=5;$i++)
{
if($i % 2==0){
print "$i 1 1"."\n";
}else{
print "$i 0 1"."\n";
}
}
#!/usr/bin/perl
for($i=1;$i<=5;$i++)
{
if($i % 2==0){
print "$i 1 1"."\n";
}else{
print "$i 0 1"."\n";
}
}
作者: mysqllog 发布时间: 2011-06-10