perl - 什么是核心 :match (opcode) subroutine in Perl profiling?

Question

我以前用 Perl 编写了一些实用程序，现在我正在重写它们以提供一些新的/更好的功能。然而，事情似乎比原来的实用程序慢得多，所以我决定用 NYTProf 分析器运行一个。伟大的分析器顺便说一句，仍在试图找出其所有有用的功能。

所以无论如何，事实证明我的程序 93% 的时间都花在了对 GeneModel::CORE:match (opcode) 的调用上。子程序，我不知道这是什么。大多数谷歌点击指向其他人发布的 NYTProf 个人资料。我确实写了GeneModel类/包，但我不知道这个子程序是什么，为什么它被调用了这么多次，或者为什么它需要这么长时间。有任何想法吗？

Answer 1

CORE:match是对正则表达式的调用——在本例中，在您的 GeneModel 中包裹。

例如，如果我们分析这个脚本，Devel::NYTProf向 Foo::CORE:match 报告 1000 个调用.

use strict;
use warnings;

package Foo;
my $s = 'foo foo';
$s =~ /foo/ for 1 .. 1000;