※ 引述《loyuchu1539 (爆走原始人)》之铭言： : 小弟是Perl 新手 由於工作需要，才开始学习perl 目前预到两个问题 : 1.撷取文字党片段到一阵列 : Ex: 文字档(map.txt)如下 : Jack : AA_map 1 : BB_map 1 : CC_map 0 : Michael : AA_map 0 : CC_map 0 : DD_map 1 : Ruby : DD_map 1 : EE_map 0 : . : . : 请问小弟该如何文字档中的Michael至Ruby中间的三行取出，存至@map 呢? : 2.存一个庞大的文字档案分类至一个hash : 以上头的文字档为范例 : 小弟该如何将这个文字档 以各别名字存为一个hash呢? : 例如存成: : $hash{Jack} = : AA_map 1 : BB_map 1 : CC_map 0 我觉得应该是要写简易的 parser 不过如果档案真的很规律的话，用 regex 硬做也无妨 可参考 https://pastebin.com/5cyt9mx7 但是好孩子不要这样写 这是假设 Jack 或 Michael 等项目一定会出现 而且一定在 xx_map 的前面出现 如果没那麽规律，就要再另外想方法 : 另外一问..若从hash内叫出来 想要判断内容，请问各位会如何撰写呢? : 比如说 判断$hash{Jack} 内 AA_map 值是否为1 是则print出 AA_map, : 若不是，则继续判断BB_Map 是否为1，印出 BB_map 直到判断到某个XX_map 为1为止.. 如果有办法把档案读成内部的资料结构 後面只是把结构内的数据再读出来 就自行加入判断式吧 : 写得有点智障...但希望看得懂得大大能指教一下@@... Perl 社群需要新血，加油 不过小弟我最近都在写 Ruby (遮脸) --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 175.182.180.49 ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1458742942.A.4CC.html ※ 编辑: Neisseria (60.251.46.166), 12/24/2018 16:17:11