[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [FWP] string increment



Tony Payne wrote:
> 
> here it is, just a little bit shorter
> 
> perl -le'$i=3;$_=aaaa;do{print}until++substr($_,$i,1)eq z&&!$i--;print'

And now for something completely different.

  perl -le'print$_=aaaa;for$i(1..4){print++$_ for($_)x25;$\=chop.$\}'

-- 
Rick Delaney
rick.delaney@home.com

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