Perl初心者スレ（マジレス回答） (523ﾚｽ)
上下前次1-新

---

466: 2018/11/21(水)23:00 ID:M0TZNmLm(2/2) AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
466: [sage] 2018/11/21(水) 23:00:44.11 ID:M0TZNmLm ハッシュを要素に持つハッシュへのアクセスについて ご教示いただけますでしょうか。 下記のコードで、読込は正常に完了しますが、出力が不可能です。 $$を使用したり、試しましたがギブアップです。 #hash.txtの中身(タブ区切り) #1 10 テスト1 #2 5 テスト2 use Encode; use utf8; my %table; my %rec; open (FILE, "<:utf8", "hash.txt") or (die "$!"); while(my $line = <FILE>){ 　chomp($line); 　@d = split(/\t/, $line); 　%rec = ('id' => $d[0], 'count' => $d[1], 'name' => $d[2]); 　$table{$d[0]} = \%rec; 　print encode('cp932', $table{$d[0]}{'id'})."\t". encode('cp932', $table{$d[0]}{'count'})."\t".encode('cp932', $table{$d[0]}{'name'})."\n"; } close(FILE); print Encode::encode('cp932', "読込完了\n"); foreach my $row (@$wrote_num){ 　#出力不可能 　print encode('cp932', $row{'id'})."\t". encode('cp932', $row{'count'})."\t".encode('cp932', $row{'name'})."\n"; } print Encode::encode('cp932', "$出力完了\n"); http://mevius.5ch.net/test/read.cgi/tech/1349538519/466
ハッシュを要素に持つハッシュへのアクセスについて ご教示いただけますでしょうか 下記のコードで読込は正常に完了しますが出力が不可能です を使用したり試しましたがギブアップです の中身タブ区切り テスト テスト 読込完了 出力不可能 出力完了

---

上下前次1-新書関写板覧索設栞歴

---

あと 57 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.029s