in reply to Re: How to get Incremental charecter groups in a string
in thread How to get Incremental charecter groups in a string

Nice, but it would be faster to use index: 
index('abcdefghijklmnopqrstuvwxyz', $_) >= 0 and print for split;

[download]

In Section Seekers of Perl Wisdom