Perlベストプラクティス

Perlベストプラクティス

posted with amazlet on 06.09.22

Damian Conway クイープ オライリー・ジャパン (2006/08/24)

Amazon.co.jp で詳細を見る

日本版が出てすぐに買っておいたけど、しばらくRubyを触っていたので放置してました。 ようやっと読み初めましたがクックブックのようにカテゴリ分けされていてそれぞれが tips になっているので、すごく読みやすいです。電車の中で読みたいけど、でかくて重いのでちょっときついです。きっと変な目で見られます。でもtipsひとつのボリュームは、電車で読むには丁度いい感じですね。 今日読んで「知らんかった」もの。

use Readonly;
Readonly my $CONSTANTS_NUMBER => 42;

use constants;してました。

use Data::Alias;
for my $agent_num (0..$#operatives) {
    alias my $agent = $operatives[$agent_num];
    $agent = '[disavowed]';
}

$operatives[$agent_num] = '[DISAVOWED]';してました。まぁこの例なら

for my $agent (@operatives) {
    $agent = '[disavowed]';
}

のほうが良いですけどね。収穫は多そうです。