可不可以详细解释一下呢，while语句不是一行一行来的吗 在 2011年1月13日 下午11:40，方伟 <[email protected]> 写道： > 哦，可以了，刚才我搞错了 > 在 2011年1月13日 下午11:38，方伟 <[email protected]> 写道： >> 不行，还是一样的输出结果 >> >> 在 2011年1月13日 下午11:31，Robin Lee <[email protected]> 写道： >>> while(<DATA>) >>> {chomp; >>> print "$_$&\n" if /L..y/; >>> } >>> >>> 这样的话就能输出你所估计的结果。 >>> >>> 2011/1/13 方伟 <[email protected]> >>>> >>>> use warnings; >>>> while(<DATA>) >>>> {print if /L..y/; >>>> print $& if /L..y/; >>>> } >>>> __DATA__ >>>> My name is Lucy. >>>> My name is Jack. >>>> My name is Lily. >>>> ############ >>>> 打印结果是： >>>> My name is Lucy. >>>> LucyMy name is Lily. >>>> Lily >>>> 我的疑惑是，打印结果怎么不是这样的呢： >>>> My name is Lucy.Lucy >>>> My name is Lily.Lily >>>> >>>> -- >>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。 >>>> 要向此网上论坛发帖，请发送电子邮件至 [email protected]。 >>>> 要取消订阅此网上论坛，请发送电子邮件至 [email protected]。 >>>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。 >>>> >>> >>> -- >>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。 >>> 要向此网上论坛发帖，请发送电子邮件至 [email protected]。 >>> 要取消订阅此网上论坛，请发送电子邮件至 [email protected]。 >>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。 >>> >> >
-- 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。 要向此网上论坛发帖，请发送电子邮件至 [email protected]。 要取消订阅此网上论坛，请发送电子邮件至 [email protected]。 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
