[删除的内容]
[删除的内容]
[删除的内容]
Array.prototype.p = Array.prototype.push;   [本行也删除]

[保留的内容]
[保留的内容]
[保留的内容]
[保留的内容]
[保留的内容]

delete(Array.prototype.p);     [本行也删除]
[删除的内容]
[删除的内容]
[删除的内容]
复制代码

[保留的内容]
[保留的内容]
[保留的内容]
[保留的内容]
[保留的内容]
复制代码

@echo off
rem 注意将代码中的两处字符串替换为文本中的整行，包含行首、尾空格（如有）。
(for /f "useback delims=" %%a in ("1.txt") do (
	if "%%a" equ "delete(Array.prototype.p);" (
		goto :next
	)
	if defined n (
		echo %%a
	)
	if "%%a" equ "Array.prototype.p = Array.prototype.push;" (
		set n=1
	)
))>"2.txt"
:next
pause
复制代码

sed -n -r "/^Array\.prototype\.p = Array\.prototype\.push\;/,/^delete\(Array\.prototype\.p\)\;/{/^$/d;/^Array\.prototype\.p = Array\.prototype\.push\;/d;/^delete\(Array\.prototype\.p\)\;/d;p}" a.txt>b.txt
复制代码

sed '1,/^Array/d;/^delete/,$d' a.txt
复制代码

@if (0)//==(0)// echo off&pause&cscript //nologo -e:jscript "%~f0"&pause&exit
@end

var inf,otf,sstr,estr,s,bbb;

inf="input.txt";
otf="output.txt";

sstr="Array.prototype.p = Array.prototype.push;";
estr="delete(Array.prototype.p);";

var fso=new ActiveXObject('scripting.filesystemobject');
inf=fso.OpenTextFile(inf,1,false);
otf=fso.OpenTextFile(otf,2,true);

s='';bbb=0;

while(!inf.AtEndOfStream){
s=inf.ReadLine();
if(s==estr){break;}
if(bbb && s){otf.WriteLine(s);s='';}
if(s==sstr){bbb=1;}
}

inf.Close();otf.Close();fso=null;
复制代码

@echo off
set "p1=^Array.prototype.p = Array.prototype.push;$"
set "p2=^delete(Array.prototype.p);"
sed -n "/%p1%/, /%p2%/p" "源文件" | sed -e "/^$/d" -e "$d" -e "1d" 
复制代码

@echo off
set "p1=Array.prototype.p = Array.prototype.push;"
set "p2=delete(Array.prototype.p);"
set "got="
for /f "delims=" %%s in (源文件) do (
	if /i "%%s"=="%p1%" (set "got=1") else if defined got (
		if /i "%%s"=="%p2%" (exit/b) else (echo,%%s)
	)
)
复制代码

'vbs
set fso=createobject("scripting.filesystemobject")
set r=new regexp
sstr="Array.prototype.p = Array.prototype.push;"
estr="delete(Array.prototype.p);"
inf="input.txt";
otf="output.txt";
inf=fso.OpenTextFile(inf,1,false)
otf=fso.OpenTextFile(otf,2,true)
r.pattern=sstr&"(.*)"&estr
r.multiline=true
otf.write r.execute(inf.readall)(0).submatches(0)
复制代码

		var D = dirs;
		Array.prototype.p = Array.prototype.push;

D.p(["D:/quest2*0*1680711711*D:/quest2/","CastReceiver_1.5.6_armeabi-v7a_by_Prosmart.by.apk*12505115*1618494146","SKYBOX v1.1.0.465.apk*140533455*1680486331","SKYBOX VR Video Player [1.1.0.525].apk*121507878*1647912077","ssrray-release-3.8.10.1.apk*36174974*1621004286",310721422,"1"])
D.p(["D:/quest2/adb*0*1633840967","aapt.exe*1639424*1619405894","aapt_20210426105805.exe*1639424*1619405894","adb.exe*1974272*1619405894","adb_20210426105805.exe*1974272*1619405895","AdbWinApi.dll*97792*1619405894","AdbWinApi_20210426105805.dll*97792*1619405894","AdbWinUsbApi.dll*62976*1619405894","AdbWinUsbApi_20210426105808.dll*62976*1619405895",7548928,""])



		delete(Array.prototype.p);	// remove alias added above

		$(document).ready(function(){
复制代码

@echo off
chcp 65001 >nul
rem 批处理保存为utf-8编码格式
set "str1=Array.prototype.p = Array.prototype.push;"
set "str2=delete(Array.prototype.p);"
for /f "tokens=1 delims=:" %%a in ('^<"test.html" findstr /n /c:"%str1%" /c:"%str2%"') do (
	if not defined s (
		set s=%%a
	) else (
		set e=%%a
	)
)
(for /f "tokens=1* delims=:" %%a in ('^<"test.html" findstr /n .') do (
	if %%a gtr %s% if %%a lss %e% (
		echo=%%b
	)
))>"out.html"
复制代码

gawk -v "IGNORECASE=1" "{print $0=gensub(/quest2/,\"xyz\",\"g\")>\"test.html\"}" test.html
复制代码

#@&cls&pause&powershell "gc -literalpath '%~f0'|out-string|iex"&pause&exit

$inf="test.html"
$otf="output.txt"

$sstr="Array.prototype.p = Array.prototype.push;"
$estr="delete(Array.prototype.p);"

$inf=[io.file]::OpenRead($pwd.path+"\$inf")
$otf=[io.file]::OpenWrite($pwd.path+"\$otf")

$infrd=[System.IO.StreamReader]::new($inf,[text.encoding]::UTF8)
$otfwd=[System.IO.StreamWriter]::new($otf,[text.encoding]::UTF8)
$otfwd.NewLine=("`n")

$s='';$bbb=0;

while(!$infrd.EndOfStream){
$s=$infrd.ReadLine()
if($s){
$ss=$s.Trim()
if(($ss.Length -ge $estr.Length) -and ($ss.SubString(0,$estr.Length) -eq $estr)){break;}
if($bbb){$otfwd.WriteLine($s);$s='';}
if(($ss.Length -ge $sstr.Length) -and ($ss.SubString(0,$sstr.Length) -eq $sstr)){$bbb=1;}
}}

$infrd.Close();$otfwd.Close()
复制代码

@echo off
set "p1=Array.prototype.p = Array.prototype.push;"
set "p2=delete(Array.prototype.p);"
sed -n "/%p1%/, /%p2%/p" "test2.html" | sed -e "/^$/d" -e "$d" -e "1d">"test2.html.new"
复制代码

    gawk: fatal: cannot open source file `inplace' for reading: No such file or directory
复制代码

sed -n -r "/Array\.prototype\.p = Array\.prototype\.push\;/,/delete\(Array\.prototype\.p\)\;/{/^$/d;/Array\.prototype\.p = Array\.prototype\.push\;/d;/delete\(Array\.prototype\.p\)\;/d;p}" test.html>b.txt
复制代码