[Perl] 無名ハッシュに関するメモ

Posted by
ぴろり
Posted at
2007/07/18 13:27
Post Comment
コメントできます
Category
開発メモ カテゴリ

 ハッシュを変数に代入せずに、ハッシュから値を参照するための覚書。基本中の基本か。

この記事を Delicious に追加する   このエントリーをはてなブックマークに追加  

#!/usr/bin/perl

sub foo {
    my %common = (
        'alphabet' => 'alpha beta gamma',
    );
    return { %common,
        'numeric' => 'one two three',
    }->{$_[0]};
}

print &foo('alphabet');
この記事を Delicious に追加する   このエントリーをはてなブックマークに追加  



コメントを投稿する

 
 (必須, 匿名可, 公開, トリップが使えます)
 (必須, 匿名可, 非公開, Gravatar に対応しています)
 (必須)
スパム コメント防止のため「投稿確認」欄に ランダムな数字 CAPTCHAについて を入力してから送信してください。お手数ですがご協力のほど宜しくお願いいたします。