$values1 = stat($currentFile2) or warn "can't stat the file: $!\n";
$hashDir2{$currentFileCD} = {
    size =>$values1->size,
    mtime =>$values1->mtime,
};


##</code><code>##

if ( my $values = stat($currentFile2) ) {
    $hashDir2{ $currentFileCD } = {
        size    =>  $values->size,
        mtime   =>  $values->mtime
    }
} else {
    warn "can't stat the file: $!\n"
}