Re^2: RegEx related line split

in reply to Re: RegEx related line split
in thread RegEx related line split

Thank you. This works as per my requirement but I was trying one other pattern

$line = q{a) Line 1. b) Line 2. c) Line 32. d) Line 42.};
[download]

Here it matches if some (words) within () that are coming in the line.

Comment on Re^2: RegEx related line split Download Code

Replies are listed 'Best First'.
Re^3: RegEx related line split by johngg (Canon) on Nov 14, 2011 at 10:30 UTC
Do you mean that the opening parenthesis is optional in the text you are spliting? If so, you can use a '`?`' quantifier to make the opening parenthesis "zero or one of" but you also have to use a negative look behind to make sure you don't split '(' from 'a)'. I've added the '`x`' modifier to the pattern so I can space it out and make it more readable. `knoppix@Microknoppix:~$ perl -E ' > $line = q{(a) Line 1. b) Line 2. (c) Line 32. d) Line 42.}; > @arr = split m{ (?<! \( ) (?= \(? [a-z] \) ) }x, $line; > say qq{>$_<} for @arr;' >(a) Line 1. < >b) Line 2. < >(c) Line 32. < >d) Line 42.< knoppix@Microknoppix:~$` [download] I hope this is helpful. Cheers, JohnGG	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: RegEx related line split
by johngg (Canon) on Nov 14, 2011 at 10:30 UTC

Do you mean that the opening parenthesis is optional in the text you are spliting? If so, you can use a '?' quantifier to make the opening parenthesis "zero or one of" but you also have to use a negative look behind to make sure you don't split '(' from 'a)'. I've added the 'x' modifier to the pattern so I can space it out and make it more readable.

knoppix@Microknoppix:~$ perl -E '
> $line = q{(a) Line 1. b) Line 2. (c) Line 32. d) Line 42.};
> @arr  = split m{ (?<! \( ) (?= \(? [a-z] \) ) }x, $line;
> say qq{>$_<} for @arr;'
>(a) Line 1. <
>b) Line 2. <
>(c) Line 32. <
>d) Line 42.<
knoppix@Microknoppix:~$
[download]

I hope this is helpful.

Cheers,

JohnGG

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom