392 |
$filesInBackup->{$path_key}->{'size'} |
$filesInBackup->{$path_key}->{'size'} |
393 |
)); |
)); |
394 |
|
|
395 |
|
my $found; |
396 |
if (! defined($beenThere->{$key}) && ! found_in_db($key, @data)) { |
if (! defined($beenThere->{$key}) && ! ($found = found_in_db($key, @data)) ) { |
397 |
print STDERR "# key: $key [", $beenThere->{$key},"]" if ($debug >= 2); |
print STDERR "# key: $key [", $beenThere->{$key},"]" if ($debug >= 2); |
398 |
|
|
399 |
if ($filesInBackup->{$path_key}->{'type'} == BPC_FTYPE_DIR) { |
if ($filesInBackup->{$path_key}->{'type'} == BPC_FTYPE_DIR) { |
400 |
$new_dirs++; |
$new_dirs++ unless ($found); |
401 |
print STDERR " dir\n" if ($debug >= 2); |
print STDERR " dir\n" if ($debug >= 2); |
402 |
} else { |
} else { |
403 |
$new_files++; |
$new_files++ unless ($found); |
404 |
print STDERR " file\n" if ($debug >= 2); |
print STDERR " file\n" if ($debug >= 2); |
405 |
} |
} |
406 |
$size += $filesInBackup->{$path_key}->{'size'} || 0; |
$size += $filesInBackup->{$path_key}->{'size'} || 0; |