perl 對行sort

kfcdog0419

請問各位大大
我今天假使有一份文件如下  我要對行開頭sort

aafwfqef
wgwrgwgwqg
xscsvdsvsvg
s2wer32ff


我想要對這文件做sort.  那sort的方式隨易. 因為我要把兩份文件sort後比較
所以sort的方式都可以

該怎麼寫呢!!?

先謝謝了

静女，其姝

问题没描述清楚，应写出期望的结果

rubyish

biru:

1. open my $A, 'a';
   
2. open my $B, 'b';
   
3. 
   
4. my @A = sort <$A>;
   
5. my @B = sort <$B>;

复制代码

104359176

对字符串进行排序用

1. my @sort_lines = sort { $a cmp $b } @lines;

复制代码