※ 引述《YMLS (流逝於指縫的細沙)》之銘言：
: 大家好，我有一筆資料如下：
: C+2AAT-3CGCA
: 我希望寫一行程式，使得數字後面的字母會依照數字的內容被拿走，如下所示：
: C+T-A
: 我嘗試如下的寫法：
: $line='C+10AAAAAAAAAAT-3CGCA';
: $line=~s/(\d+)[ACGTNacgtn]{\1}//g;
: 可是 {\1} 無法發揮我想要得效果，
: 想請問是否我的語法本身有問題呢？謝謝！
根據 http://perl5.git.perl.org/perl.git/blob?f=dquote_static.c
S_regcurly() 在 parse 的時候 { 之後一定要接數字

我記得可以用eval的option，有請高人出手…

翻 perl 的 source 出來解釋會不會太恐怖....||

謝謝您熱心的解答！！Orz

推翻perl source...orz||||

推