Re: many variables and one value
[email protected] ("Chas. Owens")
| Newsgroups | perl.beginners |
|---|---|
| Message-ID | <[email protected]> |
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.