Perlメモ:配列からハッシュを一度に生成

perlでハッシュを生成するとき、キーと中身を配列から一気に作成する。

@key_array = ('a','b','c');
@val_array = (111,222,333);

@h{@key_array} = @val_array;

foreach $key ( sort keys %h ) {
    print $key,"->",$h{$key},"\n";

}

結果は以下となる。

a->111
b->222
c->333

広告

コメントを残す

以下に詳細を記入するか、アイコンをクリックしてログインしてください。

WordPress.com ロゴ

WordPress.com アカウントを使ってコメントしています。 ログアウト / 変更 )

Twitter 画像

Twitter アカウントを使ってコメントしています。 ログアウト / 変更 )

Facebook の写真

Facebook アカウントを使ってコメントしています。 ログアウト / 変更 )

Google+ フォト

Google+ アカウントを使ってコメントしています。 ログアウト / 変更 )

%s と連携中

%d人のブロガーが「いいね」をつけました。