Coding Style #Perl

単項演算子の後はスペースをいれる。ただし+/-はスペースを入れない。

if (! $foo) {
    # …
}
if (not $foo) {
    # …
}
my $foo = +10;
my $foo = -10;

二項演算子は前後にスペースを入れる。

print $foo + $bar;

if, whileなどの後はスペースを入れる。

if ($foo) {
    # ...
}
while ($foo) {
    # ...
}

関数呼び出し演算子 () の前はスペースを入れない。

foo();
$self->foo();

ブロック閉じ括弧 } の後は改行する。if (…) の後は改行しない。

if ($foo) {
    ...;
}
else {
    ...;
}