@echo on&&setlocal enabledelayedexpansion
for /f "tokens=1 delims=:" %%i in ('findstr /n "楼主" 33.txt') do (
  echo 楼主标志的行号 %%i
  set /a xy=%%i+1
  set js=
 for /f "delims=" %%m in ("33.txt") do (
  set /a js+=1
  if !xy!==!js! echo %%m>>44.txt
  echo 标准!xy!  计数!js!
)
)
pause
复制代码

gawk "{if(A)if(B!=$0)if(NF){$0=gensub(/<.*>[　\t]*/,\"\",\"g\");print};A=0}/^楼主/{A=1;B=$0}" 1.txt>2.txt
复制代码

<# :
@echo off
powershell -NoProfile -ExecutionPolicy bypass "Get-Content -literal '%~f0' |Out-String|Invoke-Expression"
pause
#>
$a=gc .\333.txt
0..($a.Length-1) |%{if($a[$_].contains(">楼主")){$_+2}}
复制代码

<# :
@echo off
powershell -NoProfile -ExecutionPolicy bypass "Get-Content -literal '%~f0' |Out-String|Invoke-Expression"
pause
#>
$a=gc .\333.txt
0..($a.Length-1) |%{if($a[$_].contains(">楼主")){$a[$_+1]}}
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1 delims=" %%k in ('findstr /n .* 33.txt')do (echo %%k>>44.txt)

for /f "delims=:" %%i in ('findstr /n .">楼主" 33.txt') do (
  echo 楼主标志的行号 %%i
  set /a xy=%%i+1

for /f "tokens=1* delims=:" %%m in ('findstr .* 44.txt')do (
set tt=%%m
if !xy!==!tt! echo %%n>>55.txt
)
)
del /f/q 44.txt
pause
复制代码

<divclass="bbs-contentclearfix">　　爷爷是传承五代人的
<divclass="bbs-content">　　床尾站着一小仙，男，中批
<divclass="bbs-content"><br>　　<imgsrc="http://static.tianyaui.com/img/static/2011/imgloading.gif"title="点击图片
<divclass="bbs-content">　　那日入定，爷爷带
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "tokens=1 delims=" %%k in ('findstr /n .* 33.txt')do (echo %%k>>44.txt)

for /f "delims=:" %%i in ('findstr /n .">楼主" 33.txt') do (
  echo 楼主标志的行号 %%i
  set /a xy=%%i+1

for /f "tokens=1* delims=:" %%m in ('findstr .* 44.txt')do (
set tt=%%m
if !xy!==!tt! echo %%n>>55.txt
)
)
del /f/q 44.txt
for /f "tokens=1* delims=>　　" %%a in ('findstr .* 55.txt')do (
echo %%b>>66.txt
)
pause
复制代码

爷爷是传承五代人的
床尾站着一小仙，男，中批
<br>　　<imgsrc="http://static.tianyaui.com/img/static/2011/imgloading.gif"title="点击图片
那日入定，爷爷带
复制代码

gawk "A;A=0;/^楼主/{A=1}" 1.txt>2.txt
复制代码

@echo off
gawk "{if(A)if(B!=$0)if(NF){$0=gensub(/<.*>[　\t]*/,\"\",\"g\");print};A=0}/^楼主/{A=1;B=$0}" 33.txt>2.txt
pause
gawk "A;A=0;/^楼主/{A=1}" 33.txt>3.txt
pause
复制代码

D:\test>gawk "{if(A)if(B!=$0)if(NF){$0=gensub(/<.*>[　\t]*/,\"\",\"g\");print};A=0}/^楼主/{A=1;B=$0}" 1.txt
爷爷是传承五代人的
床尾站着一小仙，男，中批
那日入定，爷爷带

D:\test>gawk "A;A=0;/^楼主/{A=1}" 1.txt
<divclass="bbs-contentclearfix">　　爷爷是传承五代人的
<divclass="bbs-content">　　床尾站着一小仙，男，中批

<divclass="bbs-content">　　那日入定，爷爷带
复制代码

gc : 找不到路径“C:\Windows\System32\WindowsPowerShell\v1.0\333.txt”，因为该路径不存在。
所在位置 行:6 字符: 4
+ $a=gc .\333.txt
+    ~~~~~~~~~~~~
    + CategoryInfo          : ObjectNotFound: (C:\Windows\Syst...ll\v1.0\333.txt:String) [Get-Content], ItemNotFoundEx
   ception
    + FullyQualifiedErrorId : PathNotFound,Microsoft.PowerShell.Commands.GetContentCommand

无法对 Null 数组进行索引。
所在位置 行:7 字符: 24
+ 0..($a.Length-1) |%{if($a[$_].contains(">楼主")){$_+2}}
+                        ~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) []，RuntimeException
    + FullyQualifiedErrorId : NullArray

无法对 Null 数组进行索引。
所在位置 行:7 字符: 24
+ 0..($a.Length-1) |%{if($a[$_].contains(">楼主")){$_+2}}
+                        ~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) []，RuntimeException
    + FullyQualifiedErrorId : NullArray

请按任意键继续. . .
复制代码

sed -r -n "/>楼主：?</{n;p}" a.txt > b.txt
复制代码

gawk "a~/>楼主：?</{print};{a=$0}" a.txt > b.txt
复制代码

PowerShell "sc -Literal '%~dp0b.txt' $(forEach( $s In (gc -Literal '%~dp0a.txt' -Read 0) ){ if($a -match '>楼主：?<'){$s} $a=$s })"
复制代码

PowerShell "gc -Literal '%~dp0a.txt' | Select-String '>楼主：?<' -Context 1 | forEach{ $_.Context.PostContext } | sc -Literal '%~dp0b.txt'"
复制代码

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
    if defined s (
        if "!s:>楼主=!" NEQ "!s!" (
            echo;%%i
        )
    )
    set "s=%%i"
)
pause
复制代码

powershell "(select-string 'a.txt' -pattern '>楼主：?<' –context 1).Context.PostContext" >a11.txt
复制代码

powershell "(select-string 'a.txt' -pattern '>楼主：?<' –context 1  -Encoding default ).Context.PostContext" >a_#.txt
复制代码

select-string : 找不到路径“C:\Windows\System32\WindowsPowerShell\v1.0\a.txt”，因为该路径不存在。
所在位置 行:1 字符: 2
+ (select-string 'a.txt' -pattern '>楼主：?<' –context 1).Context.PostCont ...
+  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : ObjectNotFound: (C:\Windows\Syst...hell\v1.0\a.txt:String) [Select-String], ItemNotFound 
   Exception
    + FullyQualifiedErrorId : PathNotFound,Microsoft.PowerShell.Commands.SelectStringCommand
 
复制代码

“C:\Windows\System32\WindowsPowerShell\v1.0\a.txt”
复制代码

powershell "(select-string 'a.txt' -pattern '>楼主：?<' –context 1).Context.PostContext" >a11.txt
powershell "(select-string 'a.txt' -pattern '>楼主：?<' –context 1  -Encoding default ).Context.PostContext" >a_#.txt
复制代码

select-string -Lit 'e:\[文本处理] 提文求助：取\a1.txt'   ......  
复制代码

powershell "(select-string  -Lit '%~dp0a.txt' -pattern '>楼主：?<' –context 1 ).Context.PostContext" >a_a.txt
复制代码

powershell "(select-string -Lit '%~dp0a1.txt' -pattern '>楼主：?<' –context 1 -Encoding default).Context.PostContext" >a_1.txt
复制代码

@echo off
set n=0
setlocal enabledelayedexpansion
(for /f "delims=" %%i in (33.txt) do (
    if !n! equ 1 echo,%%i
    set "str=%%i"
    if not "!str:>楼主=!"=="!str!" (set n=1) else set n=0
))>44.txt
pause
复制代码

grep -P -A1 --no-group-separator ">楼主(：)?<" a.txt | grep -P -v ">楼主(：)?<" | find /v "" > b.txt
复制代码

@echo off
for %%n in (2,4,8,10) do set "[%%n]=%%n" &::建立伪数组 [n]=n 对应行序号
set "n=0" &setlocal enabledelayedexpansion
(for /f "delims=" %%s in (33.txt) do (
	set/a "n+=1" &for %%k in (!n!) do set "An=![%%k]!"
	if !An! equ !n! echo,%%s
))>44.txt
复制代码