52 |
# |
# |
53 |
#======================================================================== |
#======================================================================== |
54 |
# |
# |
55 |
# Version 2.1.0, released 20 Jun 2004. |
# Version 2.1.2, released 5 Sep 2005. |
56 |
# |
# |
57 |
# See http://backuppc.sourceforge.net. |
# See http://backuppc.sourceforge.net. |
58 |
# |
# |
148 |
$fileLinkMax = 0; |
$fileLinkMax = 0; |
149 |
$fileCntRename = 0; |
$fileCntRename = 0; |
150 |
%FixList = (); |
%FixList = (); |
151 |
find({wanted => \&GetPoolStats}, "$TopDir/$pool/$dir"); |
find({wanted => \&GetPoolStats}, "$TopDir/$pool/$dir") |
152 |
|
if ( -d "$TopDir/$pool/$dir" ); |
153 |
my $kb = $blkCnt / 2; |
my $kb = $blkCnt / 2; |
154 |
my $kbRm = $blkCntRm / 2; |
my $kbRm = $blkCntRm / 2; |
155 |
my $kb2 = $blkCnt2 / 2; |
my $kb2 = $blkCnt2 / 2; |