这段代码怎么不能运行,哪有错呢?

wangsheng0415

UID: 25817
帖子: 126
积分: 289
在线时间: 22 小时

1^# wangsheng0415 发表于 2008-08-26 10:07

这段代码怎么不能运行,哪有错呢?

[Copy to clipboard] [ - ]

CODE:

LINE: while (<STDIN>) {
      while (s|({.*}.*){.*}|$1 |) {}
      s|{.*}| |;
      if (s|{.*| |) {
         $front = $_;
         while (<STDIN>) {
            if (/}/) {    # end of comment?
                  s|^|$front{|;
                  redo LINE;
            }
         }
      }
      print;
}

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

2^# cobrawgl 发表于 2008-08-26 10:15

晕了晕了晕了

timespace

UID: 3244
帖子: 169
积分: 388
在线时间: 1 天 15 小时

3^# timespace 发表于 2008-08-26 10:21

相当逆天的代码啊，不合理利用正则表达式“.*”的典型！

forlorngenius

UID: 32353
帖子: 42
积分: 96
在线时间: 2 小时

4^# forlorngenius 发表于 2008-08-26 10:24

是头晕

zzyong08

UID: 19033
帖子: 9
积分: 20
在线时间: 10 分钟

5^# zzyong08 发表于 2008-08-26 12:20

这一行
s|^|$front{|;
改成
s|^|{$front}{|;
就没有错误了