你曾维护过别人的代码吗?你维护过像这样的代码吗?
my $variableThatContainsData =
someSubroutineThatMucksWithData( $someAwfulVariable );
混合大小写单词在 Perl 世界被称为 camelCase,通常它的令人不悦之处是使 阅读代码更难。
甚至具有糟糕名称的代码使用下划线也能变得更可读:
my $variable_that_contains_data =
some_subroutine_that_mucks_with_data( $some_awful_variable );
对于你希望维护、重用、及发布的任何程序,都应当具有下列代码行:
#!/usr/bin/perl
use strict;
use warnings;
启用 strict
使 Perl 抱怨不确定的代码结构,比如:未声明的变量、祼字、 以及软引用等。这些警告将导致 Perl 执行失败。
#!/usr/bin/perl
use strict;
$foo = 4; # undeclared variable error
$foo = Bar; # bareword error
my $bat = "foo";
print $$bat; # reference error
启用 warnings
使 Perl 甚至抱怨更多东东。但不像 strict
,这些抱怨在 一般条件下并不严重。
#!/usr/bin/perl
use warnings;
$a + 0; # void context warning
# name used once warning
# undef warning
print "program continued\n"; # prints
如果你想要 warnings
变得严重,告诉它:
use warnings FATAL => 'all';
$a + 0; # void warning and then exits
print "program continued\n"; # doesn't print
perltidy
格式化 Perl 源代码选择何种代码风格是仁者见仁,智者见智的事情。但重要的是保持风格的一致性。 为了使格式化 Perl 源代码更容易,你可以使用 Perl::Tidy 模块随付的 perltidy
工具。
例如,使用 Perl 最佳实践 一书所推荐的风格来格式化源代码:
$ perltidy -pbp myprogram.pl -o myprogram.formated.pl