[perl] ハッシュのスライスと多次元ハッシュのエミュレーション

XML::Simpleのコードを読んでいると以下の様な表現が頻繁に出てきました。問題は8行目なのですが、ハッシュをリストコンテキストで扱っているのですが、初めて見る表現で、調べるのにも少し手こずったのでメモしておきます。

#!/usr/bin/perl

use Perl6::Say;
use YAML;

my @keys = qw(key1 key2);
my @vals = qw(val1 val2);
@dic{@keys} = @vals;   # 問題の行
say Dump \%dic;

# 出力は以下のようになります
# ---
# key1: val1
# key2: val2

Continue reading “[perl] ハッシュのスライスと多次元ハッシュのエミュレーション”