in reply to Adding Arrays..

use List::Util qw( sum );

my $Total = sum @Rainfall;

[download]
My criteria for good software:
  1. Does it work?
  2. Can someone else come in, make a change, and be reasonably certain no bugs were introduced?

In Section Seekers of Perl Wisdom