sort无法正常按指定列排序

Zivix0406

有文本example.txt，内容为逗号分隔的两列数据

1. 1137388,1921681253无线路由器设置的方法谁能教下我？
   
2. 1149955,1921681691路由器设置的方法是什么？
   
3. 1264003,1921681100路由器设置怎么操作？
   
4. 1286556,1921681103路由器设置的方法是什么？
   
5. 1576118,1921681102路由器设置密码方法是什么
   
6. 1386788,21913522325默认网关怎么设置？
   
7. 2291470,14501000430配电柜价格是多少谁清楚？
   
8. 2463755,13713938913送的4g无线网卡怎么用的
   
9. 310340,075523181365是贵司的**吗
   
10. 310341,075523181365是贵司的联系**吗?

复制代码

现在想以第一列的数值排序，却发现无法正常排序，如图





曲线救国，把，替换成空格就能正常排序了，如图



请问这是啥原因呢？

关阴月飞

回复 1# Zivix0406

试试 -k1,1

# sort -t , -n -k1,1  urfile
310340,075523181365是贵司的**吗
310341,075523181365是贵司的联系**吗?
1137388,1921681253无线路由器设置的方法谁能教下我？
1149955,1921681691路由器设置的方法是什么？
1264003,1921681100路由器设置怎么操作？
1286556,1921681103路由器设置的方法是什么？
1386788,21913522325默认网关怎么设置？
1576118,1921681102路由器设置密码方法是什么
2291470,14501000430配电柜价格是多少谁清楚？
2463755,13713938913送的4g无线网卡怎么用的

sunzhiguolu

测试平台， Windows 7

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. use utf8;
   
5. use Encode;
   
6. 
   
7. print(encode('cp936', join(',', @$_))) for sort {$a->[0] <=> $b->[0]} map {[split(/,/, $_, 2)]} <DATA>
   
8. 
   
9. __DATA__
   
10. 1137388,1921681253无线路由器设置的方法谁能教下我？
    
11. 1149955,1921681691路由器设置的方法是什么？
    
12. 1264003,1921681100路由器设置怎么操作？
    
13. 1286556,1921681103路由器设置的方法是什么？
    
14. 1576118,1921681102路由器设置密码方法是什么
    
15. 1386788,21913522325默认网关怎么设置？
    
16. 2291470,14501000430配电柜价格是多少谁清楚？
    
17. 2463755,13713938913送的4g无线网卡怎么用的
    
18. 310340,075523181365是贵司的**吗
    
19. 310341,075523181365是贵司的联系**吗?
    

复制代码

perl abc.pl
-------------------------------------------------------------
310340,075523181365是贵司的**吗
310341,075523181365是贵司的联系**吗?
1137388,1921681253无线路由器设置的方法谁能教下我？
1149955,1921681691路由器设置的方法是什么？
1264003,1921681100路由器设置怎么操作？
1286556,1921681103路由器设置的方法是什么？
1386788,21913522325默认网关怎么设置？
1576118,1921681102路由器设置密码方法是什么
2291470,14501000430配电柜价格是多少谁清楚？
2463755,13713938913送的4g无线网卡怎么用的