Hash Math

[urbs33]

Wisest Monks, I have a fun task that I am hoping that you can help me with. I work in a large backup environment. Suppose I have 8 master servers (environments) each with 3 or 4 media servers and a total jobs count of tens of thousands. I have a script that generates a report and ftps it out for billing and emails a copy for our records. I'd like to summarize the report in the body of the email by looping through the report and pushing the master server, media server and size of each job into a hash, then loop through the hash to add the sizes of each individual media server's jobs together, and provide a total sum of each environment overall. I'm kind of stumped and just trying to read up on hashes and math. Any help would be appreciated.

[tobyink]

Something like this?

use 5.010;
use strict;
use warnings;

use List::Util 'sum';

my %messages;

$messages{one} = {
    from => "Alice",
    to   => "Bob",
    size => 1000,
};
$messages{two} = {
    from => "Bob",
    to   => "Carol",
    size => 200,
};
$messages{three} = {
    from => "Carol",
    to   => "Dave",
    size => 30,
};
$messages{four} = {
    from => "Dave",
    to   => "Eve",
    size => 4,
};

say sum map $_->{size}, values %messages;

[toolic]

perldsc is a handy resource.

[sundialsvc4]

You don’t talk about underlying databases but I feel sure that there must be one, in which case could you not use an SQL query with GROUP BY to simply obtain the statistics directly?