Help for this page
use strict; use warnings; ... foreach my $who ( @winner_first ) { printf "%10s : %d\n", $who, $tally_for{$who}->[0]; }
use strict; use warnings; ... foreach my $who ( @winner_first ) { printf "%10s : %d\n", $who, $tally_for{$who}; }
www.com | www.net | www.org
No recent polls found