Re^2: The Sieve


laziness, impatience, and hubris
	PerlMonks

by Schmunzie (Beadle)

on Mar 17, 2015 at 17:01 UTC ( #1120342=note: print w/replies, xml )

Need Help??

Oops, at the risk of being picky, your solution doesn't print 2.

Comment on Re^2: The Sieve

Replies are listed 'Best First'.

Re^3: The Sieve
by Athanasius (Archbishop) on Mar 18, 2015 at 02:19 UTC

D’oh! Don’t know how I missed that. This one (77 characters) does print 2:

for($i=2;@p<50;++$i){($x=!($i%$_))&&goto _ for@p;push@p,$i;_:print"$i,
+"x!$x}
[download]

Cheers,

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://1120342]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others scrutinizing the Monastery: (5)

As of 2023-06-10 23:55 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?