[Bioperl-l] Regular Expressions

[Aaron J. Mackey]

[ untested, of course ]

if ($seq =~ m/( (?: L [^L]* (?=L)   # Two L's separated by non-L's, but 
don't consume second L
                 ){3}                # three of these initial L's
                 L                   # the final L
               )/ix && length ($1) == 6) {
     print $1;
}

-Aaron

On Jan 14, 2004, at 6:39 AM, Lukas Schneider wrote:

> Hi ,
>
> I’ve a question to the regular expressions:
>
> Is it possible to formulate a pattern to find all blocks with a length 
> of x,
>
> which contain y repeats of defined characters?
> e.g. let’s say: find 4 Leucins in a segment with the length of 6?
>
> Many thanks....
>
>
>
> -- 
> +++ GMX - die erste Adresse für Mail, Message, More +++
> Neu: Preissenkung für MMS und FreeMMS! http://www.gmx.net
>
>
> _______________________________________________
> Bioperl-l mailing list
> Bioperl-l at portal.open-bio.org
> http://portal.open-bio.org/mailman/listinfo/bioperl-l
>