CPANモジュールを利用してハッシュ配列の中身を格納順のままに設定したいと考えております。
しかし、push関数を使用すると中身がバラバラになってしまいます。
お詳しい方いらっしゃいましたら対処法をご教授いただけますでしょうか。
以下スクリプトで実験しております。
use Tie::IxHash;
tie my %pchsh, 'Tie::IxHash';
my @ret_hash;
$pchsh{"1"} = "1";
$pchsh{"2"} = "2";
$pchsh{"3"} = "3";
$pchsh{"4"} = "4";
$pchsh{"5"} = "5";
push (@ret_hash, {%pchsh});
my %tielist;
foreach my $list (@ret_hash) {
while (my ($k, $v) = each %$list ) {
$tielist{$k} = $v;
print "$tielist{$k}\n";
}
}
push関数を使ってしまったらだめなんでしょうか。
pushを利用する理由はハッシュ配列のリファレンスを
ひとつの配列に格納し、多次元で扱う必要があるためです。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。