Help for this page
foreach my $idx ( 0 .. $#somewords - 1 ) { print " $somewords[$idx]\n"; }
foreach my $core ( @somewords[ 0 .. $#somewords - 1 ] ) { print " $core\n"; }
Ceramics Glass Wood Metal Plastic Paper Banana leaves Something else
Results (457 votes), past polls
