急～！

急～！
！




　　
　　
　　　　$a = 'DJDKGENNFBINWGAJJONGRQEI' ;
　　　　
　　　　while( $a =~ m {(D.{8})}g ){
　　　　
　　　　print OUTFILE $1 , "\n" ;
　　　　}
　　　　
　　#　　若匹配9个字母的话，结果是：
　　　　
　　#　　只能找到第一个9字母DJDKGENNF
　　#　　而在往后那个DKGENNFBI，就不能成功的找到！
　　
　　似乎是传说中的贪婪问题。于是写成
　　while( $a =~ m {(D(.*?).{8})}g ){
　　但还是不成功。。。很急～不会使用这些东西，先教给我，以后再学。
　　急～谢谢！