my ($name,$dirs,$final_href) = @_;
    my %data;
    foreach my $dir (@{$dirs})
    {

        decode($dir."/".$name,%data); # will change name
        my $final_href = 
        (
            data => { ( %{$final_href->{data} },%{ $data{data} } ) },
            total => do
            {
                my %total;
                for my $href ( $final_href->{total}, $data{total} ) {
                 $total{$_} += $href->{total}{$_} for keys %{ $href->{total} };
                }
            \%total;
            }
        );
    }

##</code><code>##

$files_href->{data} = ();
$files_href->{total} = ();