PowerShell - 文件名排序

sunzhiguolu

如何按照文件的基本名称的数值大小进行排序？



额外的排序规则，不知道能否实现:
基础排序规则依然是按照文件的基本名称的数值进行排序 (如果文件的基本名称中包含非数字字符 忽略该字符)
额外规则一、
在基础排序规则的基础上，增加对扩展名的排序 (请注意:排序时忽略扩展名中非数字字符)
(用扩展名中的第一个数字字符 按照数值的大小进行降序排序)，若扩展名的第一个字符相同 则按照扩展名的长度进行排序 (计算长度时同样忽略非数字字符)

额外规则二、
在基础排序规则的基础上，增加对扩展名的排序 (请注意:排序时忽略扩展名中非数字字符)
用扩展名中的第一个数字字符与最后一个数字字符的差 进行降序排序。
若扩展名仅包含一个字符，如: 18.2
按照扩展名第一个字符为 2, 最后一个字符为 2 处理。

beauty2003

基本名称的数值大小怎么理解？能不能举个例子。
或者你想要的效果是这样？
find . -type f|sort

Shell_HAT

什么叫做基本名称？

sunzhiguolu

回复 2# beauty2003
我将示例图片放到顶楼。

sunzhiguolu

回复 5# 本友会机友会摄友会
谢大神帮忙指点，但还有一个问题不知如何解决：


以上是排序后的结果，代码如下：

1. $list = Get-ChildItem
   
2. 
   
3. $list | Sort-Object -Property @{
   
4.     Expression = {
   
5.         [int](([string]$_.BaseName) -replace "\D")
   
6.     }
   
7. }, @{
   
8.     Expression = {
   
9.         $ext = ([string]$_.Extension) -replace "\D"
   
10.         [int]$ext[0]
    
11.         # Codes here...
    
12.      }
    
13.      Descending = $true
    
14. }
    

复制代码

如何解决在扩展名的第一个数字字符相同的情况下，再比较扩展名的长度。

sunzhiguolu

回复 7# 本友会机友会摄友会
排序后的结果，如下：

Mode                LastWriteTime     Length Name                                                                                                                       
----                -------------     ------ ----                                                                                                                       
-a---         2017/7/17     11:10          0 2.5                                                                                                                        
-a---         2017/7/17     11:10          0 2.a4                                                                                                                       
-a---         2017/7/17     11:10          0 a0b5.100                                                                                                                  
-a---         2017/7/17     11:10          0 18.2                                                                                                                       
-a---         2017/7/17     11:10          0 18.2111                                                                                                                    
-a---         2017/7/17     11:10          0 199.5004                                                                                                                  
-a---         2017/7/17     11:10          0 199.301                                      

这样可以吗？

sunzhiguolu

问题已经解决了。

sunzhiguolu

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. 
   
5. print(join('.', @$_)) for
   
6. sort {
   
7.     my @exa = $a->[-1] =~ /\d/g;
   
8.     my @exb = $b->[-1] =~ /\d/g;
   
9.     $a->[0] =~ s/\D//gr <=> $b->[0] =~ s/\D//gr
   
10.     or
    
11.     $exb[0] <=> $exa[0]
    
12.     or
    
13.     $#exb <=> $#exa
    
14. }
    
15. map {[split(/\./)]} <DATA>
    
16. 
    
17. __DATA__
    
18. 2.5
    
19. 2.a4
    
20. a0b5.100
    
21. 18.2
    
22. 18.2111
    
23. 199.5004
    
24. 199.301
    

复制代码

perl abc.pl
-----------------------
2.5
2.a4
a0b5.100
18.2111
18.2
199.5004
199.301