foreach my $date (sort by_date keys %sums)
{
    print "$sums{$date}\n";
}