@echo off
set info=互助互利,支付宝扫码头像,感谢赞助
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~dp0"
set "folder=结果"
md "%folder%" 2>nul
powershell -NoProfile -ExecutionPolicy bypass ^
    $files=@(dir^|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});^
    for($i=0;$i -lt $files.length;$i++){^
        write-host $files[$i].Name;^
        $text=[IO.File]::ReadAllLines($files[$i].FullName,[Text.Encoding]::Default);^
        if($text[0].trim() -match '^^(.+)\1$'){$text[0]=$matches[1]};^
        [IO.File]::WriteAllLines(('%folder%\'+$files[$i].Name), $text, [Text.Encoding]::Default);^
    }
echo;%info%
pause
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b /a-d *.txt') do (
    echo 正在处理文件 %%a
    set /p FirstLine=<"%%a"
    call :GetLen FirstLine LineLen
    set /a HalfLen=LineLen/2
    (for %%i in (!HalfLen!) do (
        if "!FirstLine:~0,%%i!" equ "!FirstLine:~%%i!" (
            echo,!FirstLine:~0,%%i!
        ) else (
            echo,!FirstLine!
        )        
    ))>"%%a.new"
    more +1 "%%a" >> "%%a.new"
    move /y "%%a.new" "%%a"
)
pause
goto :eof

:GetLen
setlocal enabledelayedexpansion
set "$=!%1!#"
set N=&for %%a in (4096 2048 1024 512 256 128 64 32 16)do if !$:~%%a!. NEQ . set/aN+=%%a&set $=!$:~%%a!
set $=!$!fedcba9876543210&set/aN+=0x!$:~16,1!
endlocal&If %2. neq . (set/a%2=%N%)else echo %N%
goto :eof
复制代码

dir *.txt | forEach{$a=(type $_ -ReadCount 0); $a[0] = $a[0].Trim() -replace '^(.+)\1$', '$1'; sc ($_.BaseName + '.Log') -Value $a}
复制代码

@for %%i in (*.txt) do sed -r "1s/^\s*(.+)\1\s*$/\1/" "%%i" > "%%~ni.Log"
复制代码

还是和谐一下，不讨论了。
复制代码

@echo off
sed -i "1s/ *$//" *.txt
复制代码

sed -i "1s/^ *//; 1s/ *$//" *.txt
复制代码