@echo off&setlocal enabledelayedexpansion
%1(for /f "tokens=1*" %%a in ('%0 :^|sort /r^|more /t40')do set/am=%%a%%10000&echo,%%b!m!次)&pause&goto :eof
for /f "delims=U" %%a in ('cmd /u /c echo 唉') do set "tab=%%a"
for /f "delims=" %%a in (1.txt) do (
    set "str=%%a"&set "str=!str:\= a!"&set n=99999
    for %%b in (!str!) do set/an+=1
    echo,!n! %%a%tab%\出现
)
复制代码

set/a n=-1

set mystr=aa\bb\vv\cc\dd\aaa\

setlocal enabledelayedexpansion 
   FOR /L %%i in (0,1,1000) do (                                                    
      if "!mystr:~%%i,1!"=="\" set/a n=!n!+1                                            
      if "!mystr:~%%i,1!"==""  echo !n!-%mystr%>>C:\dcam\before_sort && goto _endbefore_sort 
    )
endlocal
:_endbefore_sort
复制代码

@echo off&setlocal enabledelayedexpansion >结果.txt
(rd tmp&md tmp) >nul

set /a n=10000
for /f "delims=" %%a in (原文件.txt) do set /a n+=1&echo %%a>tmp\!n:~-4!
(for /f "delims=" %%a in ('dir /o-s /b tmp\*) do type tmp\%%a)>结果.txt

rd tmp >nul
复制代码

awk "{print length($0),$0}" a.txt|gnu_sort -knr|sed "s/.....//"
复制代码

get-content a.txt|sort-object length|%{$_.length," ",$_}
复制代码

@set @n=0;/*
@echo off
cscript -nologo -e:javascript %0 <a.txt
pause&exit /b
*/

var str=WScript.StdIn.ReadAll().split('\n')
str.sort(function(a,b){return a.length - b.length;})
WScript.Echo(str.join('\n'))
复制代码

[原文件] = "a.txt"
[最大行长度] = 65535

Set fso = WScript.CreateObject("Scripting.Filesystemobject")
text = fso.OpenTextFile([原文件],1).ReadAll

Set rec=CreateObject("ADODB.Recordset")
rec.Fields.Append "String",200,[最大行长度]
rec.Fields.Append "Length",200,Len([最大行长度])
rec.Open
For Each str In Split(text,vbCrLf)
	rec.AddNew
	rec.Fields("String") = str
	rec.Fields("Length") = Len(str)
Next

rec.Sort = "Length ASC"

Do Until rec.EOF
	Wscript.Echo rec.Fields("String")
	rec.MoveNext
Loop
复制代码

@set @n=0;/*
@echo off
cscript -nologo -e:javascript %0 <a.txt >b.txt
pause&exit /b
*/

var str=WScript.StdIn.ReadAll().split('\n')
str.sort(function(a,b){return b.split('\\').length-a.split('\\').length});
WScript.Echo(str.join('\n'))
复制代码

$Hash = @{}
get-content .\a.txt | ? {
   $Hash.ADD($_,$_.split("\").Count)
}
$hash.GetEnumerator()| Sort -Descending Value | select -ExpandProperty name
复制代码

@echo off
(rd tmp&md tmp) >结果.txt 2>nul
set "list=\29\28\27\26\25\24\23\22\21\20\19\18\17\16\15\14\13\12\11\10\09\08\07\06\05\04\03\02\01\00"
for /f "delims=" %%a in (原文件.txt) do (
	for /f "tokens=31 delims=\" %%b in (".%%a.%list%") do echo %%a>>tmp\%%b.txt
)
type tmp\*.txt>结果.txt 2>nul
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set "原文件=原文件.txt"
set "结果=结果.txt"
set "pattern=[^\\]*"
for %%a in ("%原文件%") do set size=%%~za
(for /l %%a in (1 1 50) do (
	for %%b in ("%结果%") do if %%~zb geq %size% exit/b
	findstr "^^!pattern!$" "%原文件%"
	set "pattern=!pattern!\\[^^\\]*"
))>"%结果%"
复制代码

gawk -F"\\" "{print NF,$0}" 原文件.txt | gnu_sort.exe -nrk 1 | sed "s/[0-9] //" >结果.txt
复制代码

gawk -F "\\" "{ar[NF+100]=ar[NF+100] RS $0}END{for(i=asort(ar);i;i--) print ar[i];}" 原文件.txt
复制代码

$regex = [RegEx] '\\'
$Filelist = get-content .\a.txt | % {
      New-Object PSObject -Property @{
         Name = $_
         Value = $regex.Matches($_).Count
      }
} | sort -Descending Value
$Filelist | group name|%{$_.Group}|%{$_.Name}|out-file -encoding ASCII "b.txt"
复制代码

$regex = [RegEx] '\\';
get-content a.txt | sort-object -Descending { $regex.Matches($_).Count }>b.txt
复制代码

const c='\\';
main(){
   int i;
   printf("%c%c",0xff,0xfe);
   for(i=1;i<0x20;i++){
      printf("%c%c",c,i);
      printf("%c%c",i,c);
   }
}
复制代码

tcc -run a.c>a.txt
复制代码

封専尃射尅将將專尉尊尋尌對導小尐少尒尓尔尕尖尗尘尙尚尛尜尝尞尟尠
复制代码

@echo off
for /f "tokens=0x09 delims=\" %%a in ('cmd /u /c echo 封専尃射尅将將專尉尉尋尌對導小尐少尒尓尔尕尖尗尘尙尚尛尜尝尞尟尠') do echo 制表符：[%%a]
::上例仅作演示用，其实如果只需要取特定字符，可以只用简化成这样：
for /f "delims=\" %%a in ('cmd /u /c echo 尉') do echo 制表符：[%%a]
pause
复制代码

@echo off
set 换行符=^


setlocal enabledelayedexpansion
echo 123!换行符!456
pause
复制代码

@echo off
more +4 %0 >a.txt
for /l %%a in (1 1 8) do type a.txt>>$ & type $>>a.txt
del $ & pause & exit /b

Toolpath\q\
Toolpath\q\fdf\
Toolpath\q\ewr\
Toolpath\eqwfqf\aff 
Toolpath\2
复制代码

@set @n=0;/*
@echo off
cscript -nologo -e:javascript %0 <a.txt
pause&exit /b
*/

var t = new Date().getTime();
var str=WScript.StdIn.ReadAll().split('\n')
str.sort(function(a,b) {return (b+'\\').match(/\\/g).length-(a+'\\').match(/\\/g).length});
WScript.Echo(str.join('\n'))
WScript.Echo(new Date().getTime()-t)
复制代码