The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Math::HashSum - Sum a list of key-value pairs on a per-key basis

SYNOPSIS

  use Math::HashSum qw(hashsum);
  
  my %hash1 = (a=>.1, b=>.4); 
  my %hash2 = (a=>.2, b=>.5);
  my %sum = hashsum(%hash1,%hash2);
  
  print "$sum{a}\n"; # Prints .3
  print "$sum{b}\n"; # Prints .9

DESCRIPTION

This module allows you to sum a list of key-value pairs on a per-key basis. It adds up all the values associated with each key in the given list and returns a hash containing the sum associated with each key.

The example in the synopsis should explain usage of the module effectively.

AUTHORS

David James <david@jamesgang.com>

SEE ALSO

Math::VecStat, Lingua::EN::Segmenter::TextTiling for an example of this module in use

LICENSE

  Copyright (c) 2002 David James
  All rights reserved.
  This program is free software; you can redistribute it and/or
  modify it under the same terms as Perl itself.