From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf Of Paul Makepeace
> On Fri, Jun 22, 2001 at 02:33:06PM +0100, Lee Goddard wrote:
> > ---
> > Obligatory perl schmutter .sig:
> > perl -e "while (1){rand>0.5 ? print'\\' : print'/'}" 
> 
> perl -e "print chr 47+45*int rand 2 while 1"
> 
> Cross platform!

You're the third to suggest exactly that version,
which has been tested on AS PerlWin32Users to be
slower than this:

perl -e "print rand > 0.5 ? q/\\/ : q\/\ while 1"

Have you people got nothing better to do?!

Me netierh.


Lee
---
Obligatory perl schmutter .sig:
perl -e "print rand > 0.5 ? q/\\/ : q\/\ while 1"

Reply via email to