风格
最后更新于：2022-04-01 21:07:45
## camelCase 很糟
你曾维护过别人的代码吗？你维护过像这样的代码吗？
~~~
my $variableThatContainsData =
someSubroutineThatMucksWithData( $someAwfulVariable );
~~~
混合大小写单词在 Perl 世界被称为 _camelCase_，通常它的令人不悦之处是使 阅读代码更难。
甚至具有糟糕名称的代码使用下划线也能变得更可读：
~~~
my $variable_that_contains_data =
some_subroutine_that_mucks_with_data( $some_awful_variable );
~~~
## warnings 和 strict
对于你希望维护、重用、及发布的任何程序，都应当具有下列代码行：
~~~
#!/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](https://metacpan.org/release/Perl-Tidy) 模块随付的 `perltidy` 工具。
例如，使用 _Perl 最佳实践_ 一书所推荐的风格来格式化源代码：
~~~
$ perltidy -pbp myprogram.pl -o myprogram.formated.pl
~~~
';