sub existsActBackup {
  my ($file,$max_age) = @_;
  my $tmpValue = 0;
  my $age = (time - (stat($file))[10]) / (60 * 60 * 24);
  if ($age < $max_age) {    
     $tmpValue = 1;
  } else {  
     $tmpValue = 0;      
  }  
  return $tmpValue;
}