続きは・・・
サンプル：配列の配列でデータ表現する
配列の配列を静的に作成します。
@Array_Of_Array = (
["要素１１" , "要素１２" , "要素１３" ,・・・] ,
["要素２１" , "要素２２" , "要素２３" ,・・・] ・・・
);
プログラム例では、月〜土の曜日を表す文字を格納している配列を第一要素に、Sun〜Satまでの曜日を表すアルファベット文字列を格納している配列を第二要素に持つ配列@Array_Of_Arrayを実装しています。実際には、配列のリファレンスを要素として、配列を定義しています。そのため、要素は()ではなく、[]で表現されています。注意すべき点は、配列のキーに対応する値には、配列リファレンスを値に取っている点で値にアクセスする際には、矢印演算子を用いています。
プログラム例
#!/usr/bin/perl
my %Array_Of_Array;
@Array_Of_Array = (
["日" , "月" , "火" , "水" , "木" , "金" , "土"] ,
["Sun" , "Mon" , "Tue" , "Wed" , "Thu" , "Fri" , "Sat"]
);
for my $i (0 .. $#Array_Of_Array) {
for my $j (0 .. $#{$Array_Of_Array[$i]}) {
print $Array_Of_Array[$i][$j] , " ";
}
print "\n";
}
実行結果
[it-engineer@home1 perl]# perl 20070523-4.pl
日 月 火 水 木 金 土
Sun Mon Tue Wed Thu Fri Sat
[it-engineer@home1 perl]#
