备份与恢复
备份脚本化
为备份写一些脚本是标准做法。展示一个示例程序,其中必定有很多辅助内容,这只会增加篇幅,在这里我们更愿意列举一些典型的备份脚本功能,展示一些Perl脚本的代码片段。你可以把这些当作可重用的代码块,在创建自己的脚本时可以直接组合起来使用。下面将大致按照使用顺序来展示。
- 1.安全检测
安全检测可以让自己和同事的生活更简单点——打开严格的错误检测,并且使用英文变量名。
use strict;
use warning FATAL => 'all';
use English qw(-no_match_vars);
如果是在Bash下使用脚本,还可以做更严格的变量检测。下面的设置会替换中有未定义的变量或程序出错退出时产生一个错误。
set -u;
set -e;
- 2.命令行参数
增加命令行选项处理最好的方法是标准库,它已经包含在Perl标准安装中.
use Getopt::Long;
Getopt::Long::Configure('no_ignore_case','building');
GetOptions(....);
<