Perl初心者スレ（マジレス回答） (523ﾚｽ)
Perl初心者スレ（マジレス回答） http://mevius.5ch.net/test/read.cgi/tech/1349538519/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
471: デフォルトの名無しさん [sage] 2018/11/22(木) 11:07:56.03 ID:Enb78Zev これで全てのハッシュ要素を出力できますが、 カラム順が不確定になってしまいますね。 ハッシュなので仕方ないことですかね。 foreach $row (sort keys %table) { foreach $col (sort keys %{$table{$row}}) { print encode('cp932', "$table{$row}{$col}\t"); } print "\n"; } >hash_test.pl 1 10 テスト1 2 5 テスト2 読込完了 5 2 テスト2 10 1 テスト1 出力完了 http://mevius.5ch.net/test/read.cgi/tech/1349538519/471
472: デフォルトの名無しさん [] 2018/11/22(木) 12:53:27.47 ID:+z2Jd1go >>471 キーだけ別の配列に取っといてそれ使えば？ http://mevius.5ch.net/test/read.cgi/tech/1349538519/472
475: デフォルトの名無しさん [sage] 2018/11/26(月) 04:07:41.06 ID:LFi/GsCA >>471 foreach $col (sort keys %{$table{$row}}) { を foreach $col (qw/id count name/) { とかでは? keyの名前も順番も分かってるんだし。 http://mevius.5ch.net/test/read.cgi/tech/1349538519/475
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.025s