宣言とPerl

Question

内の1つのステップでハッシュテーブルを移入現在：

my $has_field = {}; 
map { $has_field->{$_} = 1 } @fields; 

を、私は、単一のステップでのインライン初期化を行うことができます方法はありますか？ （つまり、私はそれを宣言してると同時に、それを移入？）

Answer 1

はちょうどそのようなハッシュリファレンスにドロップリストを作成するには、マップを使用します。

my $has_field = { map { $_ => 1 } @fields }; 

Answer 2

更新：申し訳ありませんが、これはそうではありません最初に$ has_fieldを宣言しなければならないので、正確に何をしたいのですか？

あなたはハッシュスライスを使用することができる：

@{$has_field}{@fields} = (1)x@fields; 

右側が@fieldsのスカラー値（あなたの配列の要素、すなわち数）ずつ繰り返すx演算子を使用しています。同じ静脈で別のオプション：私はsmart matchがいったん値のための参照ハッシュやテストの作成などの2〜5倍の速することができ、それをテストしてみた

@{$has_field}{@fields} = map {1} @fields; 

Answer 3

。だから、あなたはハッシュを何回のかなりの数を再利用しようとしている場合を除き、それはスマートな試合を行うことをお勧めします：

if ($cand_field ~~ \@fields) { 
    do_with_field($cand_field); 
} 

それは5.10以来、Perlは今ネイティブへの道を持っていることを覚えておくことは良いことです「これらの既知の値のうちのこのテストされていない値です」と尋ねると、それはスマートマッチです。