a=0
lines = data.readlines()
for linestr in lines:
linestr = linestr.strip()
a=a+1
print linestr作者: bbcar 時(shí)間: 2013-10-22 11:04
data=open(filename).read()
l = re.findall(r'Line\d+[^(Line\d+)]+',data)
for ln in l:
lns = ln.split('\n')
print lns[0],''.join(lns[1:])作者: cuteorange 時(shí)間: 2014-06-22 20:14 回復(fù) 1# s081009
my $line = do { local $/; <DATA> };
my @res = ($line =~ /Line\d+[^(Line\d+)]+/g);
for (@res) {
my ($l, @res1) = split '\n';
print $l . " ", @res1,"\n";
}
__DATA__
Line1
Q
E
Line2
P
E
Line3
P
V