作者flu (Crazy Rhythm)
看板Perl
标题Re: [问题] 两种条件搜寻
时间Tue Mar 5 21:33:37 2013
: &replacement = "//";
: open FILE, "a";
: open INPUT, ">b";
: while(<FILE>)
: {
if ( m/c\d{2,}/i ){
if( m/xxxx/ ){
# 对$_做处理
}
}
#略
: };
: close INPUT;
: close FILE;
另外，如果原本程式码中的&通通换成$, 才不会有runtime error
po上之前忘记确认是不是可执行的程式码吗?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
※ 编辑: flu 来自: 36.234.217.251 (03/05 21:35)
※ 编辑: flu 来自: 36.234.216.227 (03/06 01:14)