$Total += $_ for @Rainfall;

Some perl programmers do things in different ways. Personally, I think postfix'ed flow controll is one of the sweetest bits of syntatic sugar perl provides.

drink( $vodca + $orange ) while standing;