use strict;
use warnings;

my %volume = (host1 => ['vol1',
                        'vol2',
                        'vol3'
                        ],
              host2 => ['vol4',
                        'vol5',
                        'vol2'
                        ],
             );    

my %size = (vol1 => 10,
            vol2 => 20,
            vol3 => 30,
            vol4 => 30,
            vol5 => 20,
            );

my $host = 'host1';
my $total_size = 0;
foreach my $vol (@{$volume{$host}}) {
    $total_size += $size{$vol};
}
print "$host has $total_size at it's disposal.\n"