I think the tricky part is that spaces may appear within the "..." field. In which case the pattern may well be: /^"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"( [^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+"([^"]+)"\s+$/)
But I'm a rookie on regex, so this may not be optimal. ----- Original Message ----- From: "$Bill Luebkert" <[EMAIL PROTECTED]> To: "Chris Cappelletti" <[EMAIL PROTECTED]> Cc: <[email protected]> Sent: Tuesday, October 04, 2005 12:26 PM Subject: Re: (no subject) > Chris Cappelletti wrote: > > I have a 10 gig log file; I currently go through the log looking at > > specific fields and do stuff with the particular rows based on certain > > conditions. Each row has 12 columns. The only columns that I need are > > column 6 and 8. Each column is delimited by “somedata”. So an example > > row would look like: > > > > “column1” “column2” “column3” “column4” “column5” “column6” “column7” > > “column8” “column9” “column10” “column11” “column12” > > > > What would be the most optimal way to see if the word “pink” was in > > column 6 and “blue” was in column 8? Keep in mind that pink or blue > > could appear anywhere else in this line. > > Untested: > > foreach (@row_of_data) { > > my @flds = split; > if ($flds[5] eq '"pink"' and $flds[7] eq '"blue"') { > # found one > } > } > > -- > ,-/- __ _ _ $Bill Luebkert Mailto:[EMAIL PROTECTED] > (_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED] > / ) /--< o // // Castle of Medieval Myth & Magic http://www.todbe.com/ > -/-' /___/_<_</_</_ http://dbecoll.tripod.com/ (My Perl/Lakers stuff) > _______________________________________________ > ActivePerl mailing list > [email protected] > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ ActivePerl mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
