On Mon, Apr 24, 2000 at 05:06:15AM +0200, Arjen Wiersma wrote: > Hey people, > > This nite someone came into #perl on DALnet and asked about a string > increment routine. He wanted to do the following: > aaaa > aaab > aaac > ... > zzzz > > I came up with the following: > > 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 ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe