created: 2021-03-02T03:14:12.000Z

perlでjsの分割代入 (Destructuring assignment) みたいなことをする

jsほどスマートじゃないが、それっぽいことはできる

こんなデータがあるとして

my $h = {
    a => 1,
    b => 2,
};

こうやって取り出す

my ($a, $b) = @$h{qw/a b/};