http://www.perlmonks.org?node_id=671120


in reply to Re^2: poll ideas quest 2007
in thread poll ideas quest 2007

$trollnames[rand($#trollnames)];

That never chooses the last troll. Use $trollnames[rand(@trollnames)] instead.