perl如何删除文本最后一行字串？
perl如何删除文本最后一行字串？如下面文本，想把最后一行删除，最后一行的字串不是固定的M48METRIC,LZVER,1FMAT,2T01C2.001F042B423S...
perl如何删除文本最后一行字串？如下面文本，想把最后一行删除，最后一行的字串不是固定的
M48
METRIC,LZ
VER,1
FMAT,2
T01C2.001F042B423S6H2000
T02C0.25F042B423S6H2000
T03C0.3F042B423S6H2000
T04C0.5F042B423S6H2000
T05C1.F042B423S6H2000
T06C2.F042B423S6H2000
DETECT,ON
ATC,ON
%
T01
X002Y138
Y002
X007
X248
Y138
T02
X010911Y011431
X016667Y018236 展开
M48
METRIC,LZ
VER,1
FMAT,2
T01C2.001F042B423S6H2000
T02C0.25F042B423S6H2000
T03C0.3F042B423S6H2000
T04C0.5F042B423S6H2000
T05C1.F042B423S6H2000
T06C2.F042B423S6H2000
DETECT,ON
ATC,ON
%
T01
X002Y138
Y002
X007
X248
Y138
T02
X010911Y011431
X016667Y018236 展开
展开全部
把每一行读入数组中，然后把最后一个数组元素从数组pop出去
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
