[文本处理] 【已解决】gawk：如何提取指定个数范围的字符

gawk -v"N=2,3、4" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/);for(j in M){for(i in d)if(d[i]==M[j])print i}}" "D:\JZ\A.txt">"D:\JZ\B.txt"
复制代码

gawk -v"N=50-100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/-/);for(j=M[1];j<=M[2];j++){for(i in d)if(d[i]==j)print i}}" "D:\JZ\A.txt">"D:\JZ\B.txt"
复制代码

gawk -v"N=40,50-70，74，78，94-96，98，100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/,s);A[M[1]];for(j in s){if(s[j]==\"-\"){for(i=M[j];i<=M[j+1];i++)A[i]}else{A[M[j+1]]}};for(j in A){for(i in d)if(d[i]==j)print i}}" "D:\JZ\A.txt">"D:\JZ\B.txt"
复制代码

@echo off
setlocal enabledelayedexpansion
for /l %%d in (1,1,2) do (
set o=%%d
gawk -v"N=40,50-70，74，78，94-96，98，100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/,s);A[M[1]];for(j in s){if(s[j]==\"-\"){for(i=M[j];i<=M[j+1];i++)A[i]}else{A[M[j+1]]}};for(j in A){for(i in d)if(d[i]==j)print i}}" "D:\JZ1\!o!.txt">"D:\JZ2\!o!.txt"
)
endlocal
exit
复制代码

 gawk -v"N=2，4，13，40，50-70，74，78，94-96，98，100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/,s);A[M[1]];for(j in s){if(s[j]==\"-\"){for(i=M[j];i<=M[j+1];i++)A[i]}else{A[M[j+1]]}};for(j in A){for(i in d)if(d[i]==j)print i}}" D:\JZ1\1.txt > D:\JZ2\1.txt]
复制代码

@echo off
setlocal enabledelayedexpansion
for /l %%d in (1,1,2) do (
set o=%%d
gawk -v"N=2，4，13，40，50-70，74，78，94-96，98，100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/,s);A[M[1]];for(j in s){if(s[j]==\"-\"){for(i=M[j];i<=M[j+1];i++)A[i]}else{A[M[j+1]]}};for(j in A){for(i in d)if(d[i]==j)print i}}" D:\JZ1\!o!.txt > D:\JZ2\!o!.txt
)
endlocal
exit
复制代码

@echo off
for /l %%d in (1,1,2) do (
gawk -v"N=2，4，13，40，50-70，74，78，94-96，98，100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,M,/[^0-9]+/,s);A[M[1]];for(j in s){if(s[j]==\"-\"){for(i=M[j];i<=M[j+1];i++)A[i]}else{A[M[j+1]]}};for(j in A){for(i in d)if(d[i]==j)print i}}" "D:\JZ1\%%~d.txt" > "D:\JZ2\%%~d.txt"
)
复制代码

gawk -v"N=2,4，13 40#50-70，74-，78，94-96/98,,100" -v"RS=\r?\n| " -v"ORS= " "{++d[$0]}END{split(N,L,/[0-9]+-[0-9]+|[0-9]+/,W);for(i in W){if(split(W[i],Z,/-/)>1){for(j=Z[1];j<=Z[2];j++)M[j]}else{M[W[i]]}};for(j in M){for(i in d)if(d[i]==j)print i}}" "D:\JZ\A.txt">"D:\JZ\B.txt"
复制代码

@echo off
setlocal enabledelayedexpansion
for %%i in (1-3,5-15,20) do (
    set "s=%%i"
    if "!s:-=!" NEQ "!s!" (
        for /L %%j in (!s:-^= 1 !) do set "n=!n! %%j"
    ) else (
        set "n=!n! %%i"
    )
)
gawk -v"RS=\\s+"  -v"ORS= " "{++d[$0]};END{split(\"!n:~1!\",a);for(i in d)for(j in a)if(d[i]==a[j])print i}" 1.txt > 2.txt
pause
复制代码