+ mode filescount ftp: enhance to work with IIS ftp

This commit is contained in:
garnier-quentin 2015-05-13 11:45:11 +02:00
parent 5cb12a2aaf
commit 24539c87c4
1 changed files with 3 additions and 1 deletions

View File

@ -144,7 +144,9 @@ sub countFiles {
}
foreach my $line (@files) {
next if ($line !~ /(\S+)\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+(.*)/);
# IIS: 05-13-15 10:59AM 1184403 test.jpg
next if ($line !~ /(\S+)\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+(.*)/ &&
$line !~ /^\s*\S+\s*\S+\s*(\S+)\s+(.*)/);
my ($rights, $filename) = ($1, $2);
my $bname = basename($filename);
next if ($bname eq '.' || $bname eq '..');