Re: [FWP] string increment

[Arjen Wiersma <arjen@wiersma.org>]

> > perl -e '@a=qw(a a a a); for($i=$#a;-1 < $i; $i--) {
> > for($x=0;$x<25;$x++) {$b = ord($a[$i]); $a[$i] = chr(++$b); print
> > @a; print "\n"; } }'
> > 
> > since it's 5 am and my mind went to bed at about 3 this morning I'm sure
> > there are faster ways of doing this.. maybe even get caps into it too..
> > 
> > Any ideas?
> 
> perl -le 'print for "aaaa" .. "zzzz"'
> 
> 
> Magical string increment, you know.
> 
> 
> Ronald
> 

Heh, yeah.. I came up with that too, but that increments each character
with the entire alphabet to each character. If you look at the code I
wrote it goes it just increments the line, forming the alphabet for
each character in the line. One by one. 

I was wondering if that could be speeded up?

Regards,

Arjen Wiersma
arjen@wiersma.org


==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe