perl 正则匹配嵌套结构

发布时间：2020-12-16 00:17:26 所属栏目：大数据来源：网络整理

导读：有这么一道题。。 aaa ? bbb ? #if?defined(__MMI_DEL__) ? ???ccc ? #endif ? ddd ? eee ? #if?defined(__MMI_DEL__) ? ???fff ? ???ggg ? #endif ? hhh? 要求匹配注释外的内容，匹配之后的内容： aaa bbb ddd eee hhh 可以利用/^xxx/../^xxx/结构来匹配

有这么一道题。。

 
 
aaa ?
  
  
bbb ?
  
  #if?defined(__MMI_DEL__) ?
  
  
???ccc ?
  
  #endif ?
  
  ddd ?
  
  
eee ?
  
  #if?defined(__MMI_DEL__) ?
  
  ???fff ?
  
  
???ggg ?
  
  #endif ?
  
  hhh?

要求匹配

注释外的内容，匹配之后的内容：

aaa

bbb

ddd

eee

hhh

可以利用/^xxx/../^xxx/结构来匹配，但是出现了以下的嵌套结构，

 
 
aaa ?
  
  bbb ?
  
  
#if?defined(__MMI_DEL__) ?

  
  ???ccc ?
  
  
#endif ?

  
  ddd ?
  
  eee ?
  
  
#if?defined(__MMI_DEL__) ?

  
  ???fff ?
  
  ???ggg ?
  
  
#if?defined(__EX222__) ?

  
  ???KKK ?
  
  
#if?defined(__EX222__) ?

  
  woshi ?
  
  
#endif ?

  
  ??LLLL ?
  
  
#endif ?

  
  
#endif ?

  
  sdffff ?
  
  
#if?defined(__EX222__) ?

  
  sdfsdf ?
  
  sdff ?
  
  
#endif ?

  
  sdfdsf?

就没法用用上面的结构了，必须要使用平衡组，或者是递归来做，其实上面的代码也可以看做是<div></div>

这种类型，简单点就是(1*（1+2）/3)这种类型的括号嵌套,可以利用(?R)来递归（perlre中有详解），或者是(?？{code})

动态正则表达式结构。

以下我利用(??{code})来示范写了一段。。

 
 
#!/usr/bin/perl ?
  
  use?strict; ?
  
  use?warnings; ?
  
  my?(@arr,$re,$line,@tmp); ?
  
  while(<DATA>){ ?
  
  chomp; ?
  
  ???s/#ifs*defined.*?$/(/g;??#这里替换成(和)方便匹配 ?
  
  ???s/#endif/)/g; ?
  
  ???push?@arr,$_; ?
  
  } ?
  
  
$line?.=?"$__"?for?@arr; ?

  
  #print?$line; ?
  
  $re?=?qr/(?>[^()]+|((??{$re})))*/; ?
  
  while($line?=~?/(w*)($re)(w+)/g){ ?
  
  
????push?@tmp,split/_/,"$1$2"; ?

  
  } ?
  
  
print?join("n",@tmp); ?

  
  __DATA__ ?
  
  aaa ?
  
  bbb ?
  
  #if?defined(__MMI_DEL__) ?
  
  ???ccc ?
  
  #endif ?
  
  ddd ?
  
  eee ?
  
  #if?defined(__MMI_DEL__) ?
  
  ???fff ?
  
  ???ggg ?
  
  #if?defined(__EX222__) ?
  
  ???KKK ?
  
  #if?defined(__EX222__) ?
  
  woshi ?
  
  #endif ?
  
  ??LLLL ?
  
  #endif ?
  
  #endif ?
  
  sdffff ?
  
  #if?defined(__EX222__) ?
  
  sdfsdf ?
  
  sdff ?
  
  #endif ?
  
  sdfdsf?

?output:

aaa

bbb

ddd

eee

sdffff

sdfdsf

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!