Re^2: Prime number generator

Stunning! ++

But you realize, of course ...

#!/usr/bin/perl -l
$o=1;{(grep!($o%$_),2..$o++)||print$o;redo}
[download]

That's 43.

It's a little slower (but then we sacrificed speed a while back ;-))

Update: Make that 42 ...

#!/usr/bin/perl -l
$o=1;{grep!($o%$_),2..$o++or print$o;redo}
[download]

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

Comment on Re^2: Prime number generator Select or Download Code

Replies are listed 'Best First'.
Re^3: Prime number generator by rhesa (Vicar) on Jul 17, 2006 at 21:11 UTC
Hey, making it post-increment is clever! Well spotted :) I had a hard time getting those stupid brackets out of there. At some point, I realised that I was being bitten by buffered output, and didn't think about them anymore. I think 42 is perfect!	[reply]
Re^3: Prime number generator by Ieronim (Friar) on Jul 17, 2006 at 21:30 UTC
Cool :) ++ `s;;Just-me-not-h-Ni-m-P-Ni-lm-I-ar-O-Ni;;tr?IerONim-?HAcker ?d;print`	[reply] [d/l]