Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!uunet!wuarchive!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!att!ucbvax!iwarp.intel.com!news From: merlyn@iwarp.intel.com (Randal L. Schwartz) Newsgroups: comp.lang.perl Subject: Re: random numbers? Message-ID: <1991Feb13.191223.8293@iwarp.intel.com> Date: 13 Feb 91 19:12:23 GMT References: <16698@venera.isi.edu> <3#3Gz8.j@cs.psu.edu> <292@kyzyl.mi.org> <11422@jpl-devvax.JPL.NASA.GOV> Sender: news@iwarp.intel.com Reply-To: merlyn@iwarp.intel.com (Randal L. Schwartz) Organization: Stonehenge; netaccess via Intel, Beaverton, Oregon, USA Lines: 18 In-Reply-To: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall) In article <11422@jpl-devvax.JPL.NASA.GOV>, lwall@jpl-devvax (Larry Wall) writes: | And some of the JAPH scripts won't work. Not that those JAPHs were | portable in the first place... One, Larry. One. I wrote only *one* that used srand/rand. Before you quickly thwacked me for being non-portable. OK, so "one" is a subset of "some". :-) And, who says a JAPH has to be portable? $_ = `hostname`; s/..(.)(.).(.)(.)/Ju\3t \1noth\4\2 P\4\2l h\1ck\4\2,/; print # works on "iwarpse"..... :-) -- /=Randal L. Schwartz, Stonehenge Consulting Services (503)777-0095 ==========\ | on contract to Intel's iWarp project, Beaverton, Oregon, USA, Sol III | | merlyn@iwarp.intel.com ...!any-MX-mailer-like-uunet!iwarp.intel.com!merlyn | \=Cute Quote: "Intel: putting the 'backward' in 'backward compatible'..."====/