Re: [請益] 讀檔後找出想要的字串

[cutecpu (可愛中央處理器)]

#!/usr/bin/perl -w
open FH,"input";
while(<FH>){
  /(\(.*?\)).*:(.*)/;
  print "$1 $2\n";
}
close FH;

※ 引述《RueyJing (瑞)》之銘言：
: 我讀入一個檔案後..
: 樣式如下
: AAAAAA (XXX) AAAAA (BBB) AAAAAA : YYYYYYY
: (ZZZ) CCCCCCCCCCC (DDDD) (EEE) : FFFFFFFF
: ....
: .....
: .....
: 我希望可以每一行的第一個括號內的文字抽出來，和 冒號後的所有文字(含任何符號)
: 再重新整理成以下的格式
: XXX  YYYYYYY
: ZZZ  FFFFFFFF
: ....
: ...
: 我身邊也只有一本駱馬書..研究它也不到一個月..
: 也許我問的問題笨了點..請大家見諒..

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 218.160.56.184
推 RueyJing:謝謝了..我試過了..超好用的..