help on split

[Hai Xu]

Hi,

I ahve a string
string="ThisAAaAAteAAAAst"
now, I want to split it using "AA" as separator, say
@str = split(/AA/, $string);
however, I want to leave any AA+ as it is, that is,
AAAA and any part of AAAA are not considered as
separator.

Any one knows how to use string pattern match to
do it ?
Of course, I can do it my own way, but I'd like to see
if it's possible in pattern matching.

Thanks

Hai

 

[Gunnar Hjalmarsson]

I ahve a string
string="ThisAAaAAteAAAAst"
now, I want to split it using "AA" as separator, say
@str = split(/AA/, $string);
however, I want to leave any AA+ as it is, that is, AAAA and any
part of AAAA are not considered as separator.

Any one knows how to use string pattern match to do it ?

One way:

@str = split /(?<!A)AA(?!A)/, $string;

http://www.perldoc.com/perl5.8.0/pod/perlre.html#Extended-Patterns

 

[Hai Xu]

Thank you very much

Hai

One way:

@str = split /(?<!A)AA(?!A)/, $string;

http://www.perldoc.com/perl5.8.0/pod/perlre.html#Extended-Patterns