: &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上之前忘记确认是不是可执行的程式码吗?