Shawn H Corey

作者评论

关于 glob() 的警告。默认版本基于 C-shell,会在空格处中断。如果您的文件名包含空格,请使用 File::Glob 中的 BSD 版本。

#!/usr/bin/perl
use strict;
use warnings;

use File::Glob qw( :bsd_glob );

foreach my $file (glob "*.xml") {
my $new = substr($file, 0, -3) . "html";
rename $file, $new;
}

适用于使用版本控制的任何人,不仅仅是管理员。

1. 添加一个 critic 来检查提交。critic 不仅检查语法,还检查常见错误。

2. 添加一个 tidy 来检查提交。它将代码重新格式化为 The Style。这样,开发人员就不必浪费时间使其符合 The Style。

© . All rights reserved.