如何提取cxx语言中行尾的注释以及语句中间的注释？

raymark

比如
  if(a>b)  // some comment

  if (a>b /* comment */)

xp5211314

2个正则吧

\/\/.*?\n

\/\*.+?\*\/

cxfcxf

1. 
   
2. #!/usr/bin/perl
   
3. 
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. while (<DATA>) {
   
8.         chomp;
   
9.         print "$1\n" if (/\/\*(.*)\*\//);
   
10.         print "$1\n" if (/\/\/(.*)/);
    
11. }
    
12. 
    
13. 
    
14. __DATA__
    
15. if(a>b)  // some comment
    
16. 
    
17. if (a>b /* comment */)
    

复制代码