A0008200030013301
A0008200030013301
A0008200030013302
...
S0007200050022223
S0007200050022223
perl -nE 'chomp($_); ++$hash{$_}; END{say "$_: $hash{$_}" foreach sort keys %hash;}' temp
命令 | 描述 |
---|---|
chomp($_) | 过滤断行符号 |
$hash{...} | 哈希表 |
say | 打印 |
keys %hash | 排序哈希表 |
foreach sort keys %hash | 枚举哈希表 |
# 得到诸如如下的结果
A0008200030013301: 2
A0008200030013302: 2
...
S0005200030039839: 2
S0007200050022223: 2
网友评论