我试图通过使用(Scitools)Understand的Perl API编写Perl脚本来分析代码库(许多.c文件)。

我知道对于给定的.c文件,变量,函数等的列表很容易获得。

也许使用Understand Perl API的人可以为我指出正确的方向,以搜索文件多行中存在的特定字符串?并可能返回行号?

最佳答案

听起来就像您只是想要

  use Understand qw( );

  my $db = Understand::open("test.udb");

  # Find all 'File' entities that match test*.cpp
  for my $file_ent ($db->lookup("test*.cpp","File")) {
       my $file_contents = $file_ent->contents();
       printf "File %s matches", $file_ent->name
          if $file_contents =~ /pattern/;
  }

关于c - 如何使用(Scitools)Understand的Perl API在.c文件中查找特定字符串?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/47673327/

10-15 13:44