perl - 配列値からの perl ハッシュの作成

Question

配列を使用して配列を作成するには、perl ハッシュを作成する必要があります。体を助ける

Answer 1

あなたはできる、

my @array =(1,2,3,4,5,6);
my %hash = @array;

のようなハッシュを生成し1=>2, 3=>4, 5=>6、

my %hash = map { ($array[$_]) x (1+ ($_ && $_< $#array)) } 0 .. $#array;

のようなハッシュを生成します1=>2, 2=>3, 3=>4, 4=>5, 5=>6

Answer 2

• %hash=(1=>2,3=>4,5=>6)mpapec の答えを作成したい場合は、正しいものです。

• 作成する%hash=(1=>1,2=>2,3=>3,4=>4,5=>5,6=>6)場合は、次の操作を実行できます。

  my @array=(1,2,3,4,5,6);
  my %hash;
  for (@array) {
      $hash{$_}=$_
  }
  

• 値を気にせずにキーのみを使用する場合は、次のようにします。

  my @array=(1,2,3,4,5,6);
  my %hash;
  @hash{@array}=1;  #will produce %hash=(1=>1,2=>undef,3=>undef,4=>undef,5=>undef,6=>undef)