@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-7 delims= " %%i in (1.txt) do (
  set "aa=%%i"
  set aa=!aa:~2!
 echo !aa! %%j%%k%%l%%m%%n%%o>>2.txt
)
pause
复制代码

@set @n=0;/* & echo off

dir /b *.txt|cscript -nologo -e:jscript "%~0" ""
exit/b & rem */
arg = WScript.Arguments(0);
fso = new ActiveXObject("Scripting.FileSystemObject");
while (!WSH.StdIn.AtEndOfStream) {
    f = WSH.StdIn.ReadLine();
    txt = fso.OpenTextFile(f,1).ReadAll();
    txt = txt.replace(/^..(\d+ \d) (\d) (\d) (\d) (\d)/mg,"$1$2$3$4$5");
    fso.OpenTextFile(f,2).Write(txt);
}
复制代码

@echo off
setlocal enabledelayedexpansion
(for /f "tokens=1-7" %%i in (1.txt) do (
    set "aa=%%i"
    echo !aa:~2! %%j%%k%%l%%m%%n%%o
))>2.txt
复制代码

sort /r 1.txt /o 2.txt
复制代码

$StartTime= Get-date # 开始计时

((cat ".\00.txt") | %{
	$str=$_ -replace "^20","" -replace "[\s]",""
	$str.insert(10," ")
	}
) | SC "$env:temp\ref.txt"
$Total = (cat "$env:temp\ref.txt" -TotalCount -1).Count
(Cat "$env:temp\ref.txt")[$Total..0] | SC ".\ok.txt"

Ri "$env:temp\ref.txt" -force

Write-host "共用时间："([DateTime]::Now - $StartTime).TotalMilliseconds"毫秒" -Fore RED

# 计时结束

pause
复制代码

@echo off & cd /d "%~dp0"
echo %time%

setlocal EnableDelayedExpansion
for /f "tokens=1*" %%a in (00.txt) do (
	set "aa=%%a"
	set "bb=%%b"
	set /a n+=1
	set "str!n!=!aa:~2! !bb: =!"
	rem echo !aa:~2! !bb: =!
)

(for /l %%e in (%n% -1 1) do echo !str%%e!)>final.txt

echo %time%

pause & exit
复制代码

@echo off & cd /d "%~dp0"
echo %time%

setlocal EnableDelayedExpansion
(for /f "tokens=1*" %%a in (00.txt) do (
	set "aa=%%a"
	set "bb=%%b"
	echo !aa:~2! !bb: =!
))>%temp%\ref.txt
sort /r "%temp%\ref.txt" /o final.txt
del /q/f "%temp%\ref.txt"
echo %time%

pause
复制代码

$StartTime= Get-date # 开始计时

((cat ".\00.txt") | sort -desc | %{
	$str=$_ -replace "^20","" -replace "[\s]",""
	$str.insert(10," ")
	}
) | SC ".\ok.txt"

$Time = [DateTime]::Now - $StartTime
Write-host "共用时间："$Time.Seconds"秒 "$Time.Milliseconds"毫秒" -Fore RED

# 计时结束

pause
复制代码

gawk "{a[NR]=substr($1,3)\" \"$2\"\"$3\"\"$4\"\"$5\"\"$6}END{for(i=NR;i>0;i--)print a[i]}" 1.txt > 2.txt
复制代码

PowerShell "[Collections.ArrayList]$arr=[IO.File]::ReadAllLines('1.txt') -replace '^20|(?<!\d\d)\s';$arr.Reverse();sc 2.txt -Value $arr"
复制代码

sort /r 1.txt | sed -r "s/^20|\s//g; s/[0-9]{5}$/ &/" > 2.txt
复制代码

@echo off & cd /d "%~dp0"
echo %time%
setlocal EnableDelayedExpansion
(for /f "tokens=1* delims=	 " %%a in ('sort /r 00.txt') do (
	set "aa=%%a" & set "bb=%%b" & set "bb=!bb:	=!"
	echo !aa:~2!	!bb: =!
))>final.txt
echo %time%

pause
复制代码

[0-9]{2}([0-9]{9} [0-9]) ([0-9]) ([0-9]) ([0-9]) ([0-9])
替换
\1\2\3\4\5
复制代码