小编Gen*_*ser的帖子

我有以下行的文件:

Data;moreData;EvenMoreData1;200
Data;moreData;EvenMoreData1;200

Data;moreData;EvenMoreData2;500
Data;moreData;EvenMoreData2;0

Data;moreData;EvenMoreData3;0
Data;moreData;EvenMoreData3;0

基本上每2条线彼此相关.我试图找到最好的方法,只用一个0和它上面或下面的线打印线.所以输出就像.

Data;moreData;EvenMoreData2;500
Data;moreData;EvenMoreData2;0

Data;moreData;EvenMoreData3;0
Data;moreData;EvenMoreData3;0

我正在寻求帮助来解释以下语法.我检查了我的Perl书,并在网上查了一下.

我正在寻找以下内容:

$option =~ s/\s+//g
$option =~ m/^\s*$

非常感谢.