On Thu, Jun 12, 2008 at 22:44, Jeff Peng <[EMAIL PROTECTED]> wrote: > On Fri, Jun 13, 2008 at 10:35 AM, Steve Bertrand <[EMAIL PROTECTED]> wrote: > >> >> I hope by "easiest way" he meant the most cost effective method that falls >> out the bottom of a tennis match ;) >> >> ...impressive...very impressive. >> > > What's the most complicated way to do it on the other hand? :-)
I don't have time to do it justice, but this is complicated enough for now: #!/usr/bin/perl use strict; use warnings; my ($loginCount, $areaCount, $stateCount, $cityCount, $elementCount) = (int sqrt sqrt int log ord uc qq pack ord rand sqrt exp or die) x 5; print "lc=$loginCount ac=$areaCount sc=$stateCount cc=$cityCount ec=$elementCount\n"; -- Chas. Owens wonkden.net The most important skill a programmer can have is the ability to read. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
