perl如何计算文本指定的行之间的行数？
M48METRIC,LZVER,1FMAT,2T01C2.015F042B423S6H2000T02C0.8F042B423S6H2000T03C1.5F042B423S...
M48
METRIC,LZ
VER,1
FMAT,2
T01C2.015F042B423S6H2000
T02C0.8F042B423S6H2000
T03C1.5F042B423S6H2000
T04C2.F042B423S6H2000
DETECT,ON
ATC,ON
%
T01
X002Y143
Y002
T02
X037339Y011
T03
X0191Y009351
Y02401
Y038668
T04
X031637Y013855
Y028514
M30
如以上文本内容，我想提取T01到T02之间有多少行，T02到T03、T03到T04、T04到最后一行M30之间的行数，请各位大神帮忙 展开
METRIC,LZ
VER,1
FMAT,2
T01C2.015F042B423S6H2000
T02C0.8F042B423S6H2000
T03C1.5F042B423S6H2000
T04C2.F042B423S6H2000
DETECT,ON
ATC,ON
%
T01
X002Y143
Y002
T02
X037339Y011
T03
X0191Y009351
Y02401
Y038668
T04
X031637Y013855
Y028514
M30
如以上文本内容，我想提取T01到T02之间有多少行，T02到T03、T03到T04、T04到最后一行M30之间的行数，请各位大神帮忙 展开
展开全部
使用正则匹配要读行的起始，开始计数，再匹配到读行的结束，此时计数值就是你要的行数。注意是否包含起始与结束2行。
追问
给点代码提示一下
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
