Michael Alipio wrote:

my $word = "thequickbrown"

If I want three subsets I should be able to create:

the
heq
equ
.....
upto
.....
own

  print substr( $word, $-[0], 3 )
    while $word =~ /.(?=..)/g;

--
Ruud

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to