[文本处理] 批处理如何批量删除某些固定规则后的所有文字？

yanglin145

汪杰' 310107698402113454', M19840211', N'00', N'200000'N'CHN', N'-1', N'-1', N'', N'13564606463', N'-62058111', N'-62058111', N'rambowj@sina.com', N'', 802)
冯冬' 44010219772209444x', F19771209', N'-', N'-', N' ', N'', N'CHN', N'44', N'4401', N'', N'13826187838', N'020-31944839', N'-', N'gidy_pp@163.com'N'', N'0', N'2011-9-15 6:47:47', 807)
蒋芬' 321002195880040022', F19581004', N'文昌西路8号', N'225009', N' ', N'', N'CHN', N'32', N'225000', N'', N'13905271860', N'0514-87867777', N'0514-87868136', N'jxf_jmw@yangzhou.gov.cn'N'', N'0', N'2012-1-24 8:48:15', 808)
GO
print 'Processed 800 total records'
Tien Chun'N'OTH', N'H0715955300', M19000101', N'-', N'-'N'CHN', N'852', N'852', N'', N'15852708720', N'852-95502882', N'-', N'oliver_tien@yahoo.com.hk', N'', 809)
胡海过' 210824155207180025', F19720718', N'速度阿萨德476号901室', N'200135', N' ', N'', N'CHN', N'31', N'3100', N'', N'13601661987', N'021-68719635', N'021-68718026', N'HHY6699@163.COM'N'', N'0', N'2011-12-21 5:41:05', 810)
陈涛'N'OTH', N'06721420', M19000101', N'-', N'-'N'CHN', N'44', N'510000', N'', N'13925181180', N'020-13925181180', N'-', N'chxiaotao@163.com', N'', 811)
苗孙华' 420111197403137330', M19740313', N'南速度地方打1号艾默生', N'518057', N' ', N'', N'CHN', N'44'N'13823701974', N'0755-86010085', N'-', N'miaohua.m@gmail.com'N'', N'0', N'2012-12-25 2:30:26', 812)
Gu Lan' 110108198011024242', F19801102', N'-', N'-', N' ', N'', N'CHN', N'-1', N'110108', N'', N'13910263515', N'-', N'-', N'laniris1102@yahoo.com'N'', N'0', N'2010-12-9 8:07:35', 813)

请看上面一段文本
我想只保留
蒋芬' 321002195880040022
冯冬' 44010219772209444x
汪杰' 310107698402113454
像这样的规则的，其他的一律删除，请教该如何写批处理

hank_fan

胡海过' 210824155207180025'
苗孙华' 420111197403137330
你的意思还不是保留名字和身份证号，这两个不满足么？

apang

@set @n=0;// & cscript -nologo -e:jscript "%~0"<a.txt & pause & exit/b

txt = WScript.StdIn.ReadAll();
re = /^.*?\d{17}(\d|x)/img;
while ((ar = re.exec(txt)) != null) {
        WScript.Echo(ar[0])
}
复制代码