[問題] 請問如何抓下一行

看板Perl作者 (Love everywhere)時間16年前 (2009/03/31 10:17), 編輯推噓1(108)
留言9則, 3人參與, 最新討論串1/3 (看更多)
各位好, 請問perl有像PHP or C 的 fgets一次只抓一行的功能嗎? 我在網路上搜尋找不太到, 我讀了一個檔如下 aaaaaaaaa bbbbbbbbbbb ccccccccccccc #dddddddddddddddd eeeee fffffffff 我抓到 #ddddddddddddd 這一行之後, 如何下指令抓下一行 eeeee 因為我實在找不到又急, 所以都上來請問一下各位 謝謝 ~ -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.113.239.62

03/31 10:36, , 1F
基本上perl的讀取一次都讀一行..@@
03/31 10:36, 1F

03/31 10:42, , 2F
Hi, 我的意思是我讀到有#的一行了後
03/31 10:42, 2F

03/31 10:42, , 3F
像C就可以fgets再抓下一行的值
03/31 10:42, 3F

03/31 10:42, , 4F
Perl感覺沒什麼直接的指令可以做
03/31 10:42, 4F

03/31 10:43, , 5F
我知道讀FILE可以用$_, 但我是用foreach讀array
03/31 10:43, 5F

03/31 10:43, , 6F
不知道該怎麼下指令, 謝謝~
03/31 10:43, 6F

03/31 12:20, , 7F
我找到比較蠢的解決方法了, THX~
03/31 12:20, 7F

03/31 15:29, , 8F
我遇到這樣的狀況會設$i=0,然後抓到#d就$i=1,設定if迴圈
03/31 15:29, 8F

03/31 15:30, , 9F
當$i=1時print且$i--。 不知道你說的蠢方法是不是這樣XD
03/31 15:30, 9F
文章代碼(AID): #19qNqTGy (Perl)
文章代碼(AID): #19qNqTGy (Perl)