Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Find part of string

by nimdokk (Vicar)
on Dec 11, 2006 at 15:59 UTC ( #589063=note: print w/replies, xml ) Need Help??


in reply to Find part of string

Well, one way to do it might be as follows:

while (<DATA>) { chomp; if (/_theWord/) { print "$_ contains '_theWord'\n"; } } __DATA__ ac_dajhta_theWord sd_dfdfe_fdfdv ca_hereeds_theWord se_dcvdfdef_dsfd cx_hserj_theWord fa_dferefvdvv_fadfde

However, I'm sure others might come up with better regex's to use.