newswan

linux sort

dir /b | sort --version-sort
复制代码

newswan

powershell

$ToNatural = { [regex]::Replace($_, '\d+', { $args[0].Value.PadLeft(20) }) }
Get-ChildItem  -path 'X:\xx\a*.txt' | Sort-Object $ToNatural | ForEach-Object { get-content $_.fullname } | out-file a.txt
复制代码

newswan

$sour = "aaa"
$ToNatural = { [regex]::Replace($_, '\d+', { $args[0].Value.PadLeft(20) }) }
Get-ChildItem -path $sour -Filter "*.txt" |
    Sort-Object $ToNatural |
    ForEach-Object {
        get-content -Encoding utf8 $_.fullname |
            Out-File -Append (( $_.basename -replace  "\d+$","" ) + ".txt")
}
复制代码

newswan

powershell

$sour = "."
Get-ChildItem -path $sour -Filter "*-*.txt" | ForEach-Object {
    if ($_.basename -match "(.*)-(\d+)$")
    {
       write-host $_.basename ($matches[1] + "-" + $matches[2].PadLeft(6,"0"))
#       rename-item -path $_.FullName -NewName ($matches[1] + "-" + $matches[2].PadLeft(6,"0") + $_.Extension)
     }
   }
复制代码

先测试，正确的话，把地6行的#去掉

newswan

这么多文件，应该按小说名分目录

寄生\12.txt
寄生\13.txt
寄生\6.txt
寄生\7.txt
红尘仙道\100.txt
红尘仙道\93.txt
红尘仙道\94.txt
红尘仙道\95.txt
复制代码

后续处理方便

newswan

回复 27# autoav

请问
everything 正则改名 怎么处理0的个数问题？

newswan

回复 31# autoav


everything 以前没注意这个功能
谢谢