{
    use Data::Diver qw/ Dive /;
    my $metric = Dive( $mainHash , $hashType , $regionID, 'MetricType' );
    my $cirtem = Dive( $metric, $$resultHash{Location} , $yearMonthDateList[$start] );
    $cirtem +=  $$resultHash{Value};
}

##</code><code>##

{
   $mash->mertem( $mash->mertem + $value );
}