###### test.txt######## sample AA sample BB Not sample CC good boy good yyy bad aaa #### open(FILE,"test.txt"); while(){ if(/^sample\s+(\S+)/){push @sample,$1} if(/^good\s+(\S+)/){push @good,$1} } close(FILE);