「Perl入門」ハッシュの初期化にリストを指定するサンプル

2022年4月14日

環境
Perl 5.32.1
Windows10 home 64bit

書式
my @ハッシュ名 = (キー1,値1,xxx);
ハッシュはキーと値をペアとして使用しますのでリストを指定する場合にはキーと値を交互に指定します。
ハッシュの初期化にリストを指定します。

my @ハッシュ名 = (
  キー1 => 値1,
 　　略
  キーn => 値n
);

使用例

use strict;
use warnings;
use utf8;
binmode STDIN, ':encoding(cp932)';
binmode STDOUT, ':encoding(cp932)';
binmode STDERR, ':encoding(cp932)';

my %city = (
"tokyo" => "東京都",
"oosaka" => "大阪",
"yokohama" => "横浜"
);

print "$city{'tokyo'}";
print "\n";
print "$city{'oosaka'}";
print "\n";
print "$city{'yokohama'}";
print "\n";

実行結果
>perl 13.pl
東京都
大阪
横浜