連想配列&配列の2次元配列

時折、perlで「連想配列(ハッシュ)&配列の2次元配列」を使いたくなるのだが、ググっても案外情報が少なくて難儀する。あれこれ試してようやく思い出したので、将来自分がググったときのために記しておく。感謝しろよ>将来の自分w

ちなみに「連想配列(ハッシュ)&配列の二次元配列」とは、次のような形の配列。

$foo{"連想配列"}[0] = "ときどき";
$foo{"連想配列"}[1] = "使いたい";
:
:

ちゃんとした正しい名前がありそうだけれど、知らないだなも。(←『とびだせ　どうぶつの森』を始めたらしい)


この形の配列に、値をまとめて代入するには……

@family{"田中"} = ([ "一郎","二郎","三郎","四郎" ]);

配列の要素数-1、を得るには……

$count = $#{$family{"田中"}};

でOK。

#!/usr/bin/perl
#
# サンプルコード sample.pl

@family{"田中"} = ([ "一郎","二郎","三郎","四郎" ]);

$count = $#{$family{"田中"}};

for ( $i = 0; $i <= $count; $i++ ){
  printf "%s\n",$family{"田中"}[$i];
}

foreach $i ( @{$family{"田中"}} ){
  printf "%s\n",$i;
}

このコードを実行すると……

$ perl sample.pl
一郎
二郎
三郎
四郎
一郎
二郎
三郎
四郎

こうなる。

初めてのPerl 第6版

• 作者: Randal L. Schwartz
• 出版社/メーカー: オライリージャパン
• 発売日: 2012/07/25
• メディア: 大型本

かんたん Perl (プログラミングの教科書)

• 作者: 深沢 千尋
• 出版社/メーカー: 技術評論社
• 発売日: 2016/01/16
• メディア: 単行本（ソフトカバー）

Sponsored Link