Perl 板


LINE

你有寄一封信给我 我直接把回答贴上来吧 这样我没说清楚的地方 还有别人可以帮我补充 你说 -------------------- 我不太懂你写的耶@@ 我相信大大应该有看懂我描述的问题 我想写的其实是一个log档的分析程式...希望写一个以参观者ip为观点的常去网站排行榜 所以每指定一个ip,程式应该要呈现他那个ip去过的网站,以参观次数作前10名呈现 一开始建的table: %host (就是以ip为key,网站host为value), 所以我现在的问题就是卡在取出该ip对应的网站array後,不知道怎麽就该array里的元素 作依count数的处理,而且又要依hash table的对应. while(my $line=<FHD>){ $host{ip} .= $host ." "; # 建 %host } foreach $url(sort values %host){ $count = 0; @host = split(" ",$url); # 现在该ip对应的网站纪录都在这个阵列内了 foreach $host(@host) { ....... # 我困扰的应该在这里有关count的问题吧 >__< } } 如果大大你有看懂我的问题且又知道怎麽作的话....可以教我吗 我想好久了....写程式写太少了^^" 我也有想过用reference的,可是reference再reference就乱掉了@@ 所以你跟我说你写的那行也可以...希望有回音...谢谢您 :) --------------------------------------- 基本上你的问题 每一个使用者 能够对应到多个网址 每个网址有自己的count数 right? 像这种一对多 一对一的关系 最好是利用database来implement 一行就可以选出你要的结果 如果你不要使用DB 就得先存入text file 自己想方法去parse他 之後 依照你的资料的特性 你所选用的资料结构 巢状hash 这个想法没错 到这边你都作对了 只是hash的hash应该使用我给你的那个码 $hash_ref->{IP}->{website} = count; 而不是用你上面的array 要懂我这行码 你只要把reference弄熟就可以了 我下面写一个范例说明一下 你先把所有的资料 全部装到上面那个hash的hash的data structure 之後一个ip进来 就先取得此ip对应的reference $ref = $hash_ref->{ip} 然後要对count作sort foreach $key (sort {$ref->{$a} <=> $ref->{$b}} keys %{$ref}){ 看要拿这个key作什麽事 $key ...... } 我先去打电动搂 如果有问题再提出来大家研究吧 我很久没写perl 如果有错大家在帮我订正一下吧 ※ 引述《seagal (待救的小米)》之铭言: : ※ 引述《jasonzn (和贺英良)》之铭言: : : 我的问题是这样的...对於下面的文件: : : 219.68.138.37 http://www.top-sites.ws/ : : 80.199.93.248 http://chat.yahoo.com : : 56.184.122.209 http://g.msn.com/ : : 56.184.122.209 http://g.msn.com/ : : 56.184.122.209 http://members.msn.com/ : : ........等等 : : 我希望使用者选定一个IP,然後程式可以针对其参观的网址作排行 : : 我现在的写法是先建一个key/value: IP/website的Hash table : : 然後这个hash应该长成: : : 219.68.138.37 http://www.top-sites.ws/ : : 80.199.93.248 http://chat.yahoo.com : : 56.184.122.209 http://g.msn.com/ http://g.msn.com/ http://members.msn.com/ : : 接下来我用values取出这个hash的value作处理,也就是现在只对右手边的网址做处理 : : 像第三行网址中http://g.msn.com/出现2次,而http://members.msn.com/只出现一次 : : 所以以56.184.122.209这个IP来说,http://g.msn.com/是他比较常去的,所以应显示 : : 219.68.138.37 http://www.top-sites.ws/ : : 80.199.93.248 http://chat.yahoo.com : : 56.184.122.209 http://g.msn.com/ http://members.msn.com/ : : 大概是这样,我希望做出巢状Hash的样子,以上例来说就是 : : key value : : ( IP website),而其中的website又跟参观次数count形成一个hash table : : 请问大家这样要怎麽做呢,我可能叙述的不好,但还是希望有人能看懂^^" : : 谢谢:) : $hash_ref->{IP}->{website} = count; -- 生物资讯研究室:每天都会更新文件,提供生物资讯教学,生物字典。 http://www.bioinformatic.idv.tw --



※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.109.73.177 ※ 编辑: seagal 来自: 140.109.73.177 (12/12 21:54)







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:BuyTogether站内搜寻

TOP