Re^2: Regexp help, multiple lines

Hi! thanks for really fast answers, I had some not complete informations in my question, so I updated it. Maybe I should first collect all 'Paragraph' names into array and after them create such regexp ?
I did know .. and ... operators, but it is nearly same as (.*), it doesn't help here. My regexp should looks like
/^ {5}\S[^:]+:$\s+([^ {5}\S])/ism
but ofcourse '[^ {5}\S]' doesn't work, we know why...:(

Comment on Re^2: Regexp help, multiple lines Select or Download Code

Replies are listed 'Best First'.
Re^3: Regexp help, multiple lines by CombatSquirrel (Hermit) on Aug 16, 2004 at 05:34 UTC
You might want to use something like this `#!perl use strict; use warnings; my $paragraph = 0; for (<DATA>) { do { ++$paragraph; next; last if $paragraph > 2 } if substr($_, 5, 1) ne ' '; print if $paragraph == 2; } __DATA__ Paragraph1: text Paragraph2: text1 text2 text3 Paragraph3: text` [download] Hope this helped. CombatSquirrel. Entropy is the tendency of everything going to hell.	[reply] [d/l]
Re^4: Regexp help, multiple lines by 2ge (Scribe) on Aug 16, 2004 at 08:16 UTC
here is solution, which help me, combining all of your answers, I know name of start Paragraph, but don't know name of end Paragraph, so...THANKS (sorry for mess in replies): `#!perl use strict; use warnings; my $para = 'Paragraph2:'; while (<DATA>) { print if (/^ {5}$para:?\s*$/i ... /^ {5}\S/ and /^ {7}/) } __DATA__ Paragraph1: text11 Paragraph2: text21 text22 text23 Paragraph3: text31` [download]	[reply] [d/l]