這段代碼怎么不能運行,哪有錯呢?

wangsheng0415

1. LINE: while (<STDIN>) {
   
2.         while (s|({.*}.*){.*}|$1 |) {}
   
3.         s|{.*}| |;
   
4.         if (s|{.*| |) {
   
5.             $front = $_;
   
6.             while (<STDIN>) {
   
7.                 if (/}/) {      # end of comment?
   
8.                     s|^|$front{|;
   
9.                     redo LINE;
   
10.                 }
    
11.             }
    
12.         }
    
13.         print;
    
14.     }

復(fù)制代碼

cobrawgl

暈了暈了暈了

timespace

相當(dāng)逆天的代碼啊，不合理利用正則表達式“.*”的典型！

[ 本帖最后由 timespace 于 2008-8-26 10:31 編輯 ]

forlorngenius

是頭暈

zzyong08

這一行
s|^|$front{|;
改成
s|^|{$front}{|;
就沒有錯誤了