Re: [問題] 請問perl有nested hash嗎?
※ 引述《seagal (待救的小米)》之銘言：
順便把我寄給你的code
也一起貼過來吧 希望對於日後學習reference的新手有幫助
use Data::Dumper;
$hr->{ip1}->{url1} = 3;
$hr->{ip2}->{url2} = 4;
$hr->{ip2}->{url3} = 9;
$hr->{ip2}->{url4} = 8;
#print Dumper($hr);
foreach $ip (keys %{$hr}){
$r = $hr->{$ip};
foreach $url (sort {$r->{$a} <=> $r->{$b}} keys %{$r}){
print $ip, "\t", $url, "\t", $r->{$url}, "\n";
}
}
--
生物資訊研究室：每天都會更新文件，提供生物資訊教學，生物字典。
http://www.bioinformatic.idv.tw
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.109.73.177
推
140.116.82.172 12/16, , 1F
140.116.82.172 12/16, 1F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
