Perl初心者スレ(マジレス回答) (523レス)
上
下
前
次
1-
新
470
: 2018/11/22(木)10:54
ID:iCX1SQ90(2/2)
AA×
[
240
|
320
|480|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
470: [sage] 2018/11/22(木) 10:54:51.08 ID:iCX1SQ90 これでいけました! foreach my $row (keys %table){ print encode('cp932', "$table{$row}{'id'}\t$table{$row}{'count'}\t$table{$row}{'name'}\n"); } >hash_test.pl 1 10 テスト1 2 5 テスト2 読込完了 1 10 テスト1 2 5 テスト2 出力完了 ただ、key を外して foreach my $row (%table)とすると下記の通り改行が入ります 1 10 テスト1 2 5 テスト2 出力完了 http://mevius.5ch.net/test/read.cgi/tech/1349538519/470
これでいけました! テスト テスト 読込完了 テスト テスト 出力完了 ただ を外して とすると下記の通り改行が入ります テスト テスト 出力完了
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 53 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
ぬこの手
ぬこTOP
0.018s