terse 当前离线
中将
TOP
@echo off&setlocal enabledelayedexpansionsort a.txt | findstr . >temp.txset /pstr=<temp.txset num=1000000001(for /f "skip=1 delims=" %%i in (temp.tx) do ( if "!str!" neq "%%i" ( echo;!num:~1! !str! set num=1000000001 ) else set /a num+=1 set str=%%i) echo;!num:~1! !str!)>sort.txtsort /r sort.txt >temp.tx(for /f "tokens=* delims=0" %%i in (temp.tx) do echo;%%i)>sort.txtdel temp.txpauseCOPY
(@gawk -vt=10000000000 "{ar[$0]++}END{l=asorti(ar,b);for(i=1;i<=l;i++) a[ar[b[i]]+t,b[i]];asorti(a);for(i=l;i>=1;i--) {split(a[i],b,SUBSEP);print b[1]%%t,b[2]}}")<a.txt >sort.txtCOPY
回复 terse 这个非常不错,应完美了。 辛苦了 时间缩短了一半 开始的那个好像是特殊符号( ... rack 发表于 2013-6-14 18:52