Dateien suchen, kopieren und sortieren

#Quellordner
$source = 'c:\quelleroot'  
# Zielordner
$target = 'C:\zielroot'  
# Logfile
$logfile = 'C:\logfile.txt  
$cnt = 0
# Für alle Dateien des Quellordners inkl. Unterordner welche nur aus Zahlen bestehen ...
gci $source -recurse | ?{!$_.PSIsContainer -and $_.Basename -match '^\d+$'} | %{  
    # Ordnername generieren (10000er Sätze)
    $lowerbound = [math]::Floor(([decimal]$_.BaseName / 10000)) * 10000
    $newfolder = $target + "\" + $lowerbound.toString().PadLeft(10,'0') + "-" + ($lowerbound + 9999).toString().padLeft(10,'0')  
    # Ordner erstellen falls er noch nicht existiert
    if (!(Test-Path $newfolder)){md $newfolder -Force | out-null}
    $fname = $_.Name; $cnt = 1
    # auf Duplikate checken und bei Bedarf eine zusätzliche Nummer (x) anhängen
    while((Test-Path "$newfolder\$fname")){  
        $fname = "$($_.Basename)($cnt)$($_.Extension)"; $cnt++  
    }
    # Datei in Zielordner kopieren
    copy $_.FullName "$newfolder\$fname" -Verbose  
    $cnt++
}
# Write Log
@"  
$(get-date -F g) / Computer: $env:COMPUTERNAME / Anzahl kopierter Dateien: $($cnt)
--------------
"@ | Add-Content -Path $logfile