有取舍的split

104359176

这个问题有点复杂，但可以拆成几个相对简单的问题

1. 将 [..]的结构中的逗号替换成别的符号。
2. 将嵌套的结构都替换掉
3. 按照逗号拆分。
4. 将拆分后的内容中的逗号恢复

104359176

回复 9# grshrd49


    my $times;

    while ($times) {
        $times = $text =~ s/[ ([^\]]+) ]/'<' . replace_comma($1) . '>'/xmsge;
    }

    sub replace_comma {
         my $str = shift;
         $str =~ s/,/_comma_/g;
         return $str;
    }

104359176

回复 14# grshrd49
对层数没有限制。代码没有测试，思路就是每次替换掉一层，将边界字符也替换掉。然后再次替换，直到找不到可以替换的。

   

104359176

回复 17# rubyish


    这个问题确实很复杂，将一个复杂的问题拆分成几个简单点的问题，就简单多了。