Select Code to Download

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

if ( my $values = stat($currentFile2) ) {
    $hashDir2{ $currentFileCD } = {
...
    warn "can't stat the file: $!\n"
}