続続・Perl

Perl の参考書としては http://www.janit.com/TechnoInf/ の「3. でも、やっぱり Perl が一番好き!」も良さそうだ。

サブルーチンの引数を受け取る(ことに限らないけど)には、

sub hoge {
    my ($foo, $bar) = @_;
}

のほかに、

sub hoge {
    (my $foo, my $bar) = @_;
}

ともできるみたいだ。前者は本で良く見かけるが、後者は見かけない。後者は反則なのだろうか。気になる。個人的には後者のほうが素直なような感じがするけど。