My late-nite japh attempt :-)

Here's my late nite shot at a japh - my first attempt, and probably not its last revision. It should work for most folks, but depends on a specific rand, which not all folks have (doesn't seem to work in Win). ~~And there aren't any spaces :-( -- saving that for later :-)~~

do{srand($_);print((' ',a..z)[int(rand(27))])for 0..3}
for('545666138092139611801068530967354465'=~/(.{6})/g)
[download]

Best,
-Adam

Update: Now includes spaces :-)
Update2: I read up on the rules and placed in a newline to make it fit in an oldstyle usenet sig. You can eliminate the newline if you'd like.

--
Impossible! The Remonster can only be killed by stabbing him in the heart with the ancient bone saber of Zumakalis!

Comment on My late-nite japh attempt :-) Download Code

Replies are listed 'Best First'.
Re: My late-nite japh attempt :-) by kaif (Friar) on Jun 05, 2005 at 17:14 UTC
`do{srand($_);print((' ',a..z)[int(rand(27))])for 0..3} for('185103579996010520472053207918834193'=~/(.{6})/g)` [download] Memory-hungry code used to generate this: `$x=join$",map{srand$_;join"",map{10+int rand 27}(1..4)}(0..10*6);prin +t map{sprintf "%06d",1/9index$x,join"",map{10+ord()%32}/./g}"good job and unique id +ea"=~/.{4}/g` [download]	[reply] [d/l] [select]
Re^2: My late-nite japh attempt :-) by jdalbec (Deacon) on Jun 05, 2005 at 19:34 UTC
It's not a completely unique idea - see JAPH Randomness.	[reply]
Re^3: My late-nite japh attempt :-) by Adrade (Pilgrim) on Jun 08, 2005 at 09:33 UTC
Oh well - I guess I figured someone might have tried using rand to do this... anyway, thx for the link -Adam -- Impossible! The Remonster can only be killed by stabbing him in the heart with the ancient bone saber of Zumakalis!	[reply]