>> On 27/2/02 13:11, "Jon Molin" <[EMAIL PROTECTED]> wrote: >> >> >> Hi, >> >> I was wondering if any one can help me. Is there any command in perl that >> will let me match a line only if the next line >> fufills a certain condition, without doing a double loop over the file? >> My data is like this >> >> Variable1 number number number >> Variable1 number number number --- want this line >> Variable2 number number number --- and this >> Variable2 number number number > > I'm pretty new to perl myself, but: > > #!/usr/bin/perl -w > use strict; > use warnings; > > my $variable1 = "line1 \n line2"; > print "$1\n" if $variable1 =~ /(.+)["\n"]\sline.+/;
The regex could probably be simplified: <do something> if $variable1 =~ /[\n]\s<MATCH>/; Where <MATCH> is what you would want to be matched for in the second line of $variable1. -- T. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
