Help for this page
sub sieve { my@p;@_=2..pop;{push@p,$p=shift;redo if@_=grep$_%$p,@_}@p }
sub sieve { my@p;@_=2..pop;{push@p,shift;redo if@_=grep$_%$p[-1],@_}@p }
Ceramics Glass Wood Metal Plastic Paper Banana leaves Something else
Results (520 votes), past polls
