Sudhindra Bhat wrote: > > Hi Hello,
> This doesn't seem to work. I get a blank output. But yes the output that is > want is > > 123456 ABCDEF > 123456 while ( <FILE> ) { next unless /\S/; if ( s/^.*?Test:\s*// .. /Results:/ and !/Results:/ ) { print } } John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>