Help for this page
open my $fh, '<', 'list.txt' or die "Can't open list.txt: $!";
my ( $a, @ss ) = split ...
while ( my $line = <$fh> ){ chomp $line; print "$line\n"; }
Ceramics Glass Wood Metal Plastic Paper Banana leaves Something else
Results (429 votes), past polls
