Performance Perl，别名sub to变量
我目前正在对一个perl程序进行微优化，并喜欢优化一些getter 我有一个具有此getter结构的包：Performance Perl，别名sub to变量,performance,perl,Performance,Perl,我目前正在对一个perl程序进行微优化，并喜欢优化一些getter 我有一个具有此getter结构的包： package Test; our $ABC; sub GetABC { $ABC } # exported sub... 调用GetABC（）会产生大量子相关的开销。通过$Test:：ABC直接访问变量的速度快得惊人 有没有一种方法可以将getter别名为变量以获得与直接调用变量相同的PerformanceBost？用“（）”内联提示似乎不起作用…无法将变量转换为访问器子项，或用变量
package Test;
our $ABC;
sub GetABC { $ABC } # exported sub...
有没有一种方法可以将getter别名为变量以获得与直接调用变量相同的PerformanceBost？用“（）”内联提示似乎不起作用…无法将变量转换为访问器子项，或用变量访问替换子项。你将不得不忍受开销 非解决方案：
- 使用
原型不会将调用转换为sub-to-constant访问，因为该原型只会使sub可能符合内联条件。由于接头主体本身不是常数，因此此接头不能是常数（） - 开销是每个调用的开销，因为perl必须为每个调用做大量的簿记。因此，在XS中重写该访问器不会有多大帮助
- 创建
没有帮助，因为该常量是变量的副本，而不是别名常量
package Foo;
use strict;
use warnings;
use feature 'say';
my $x = 7;
BEGIN { $Foo::{GetX} = \$x } # don't try this at home
say GetX; #=> 7
$x = 3;
say GetX; #=> 3
如果函数调用开销确实难以承受（例如，占用了两位数的处理时间），那么自己在源代码中进行内联将是最好的选择。即使您有很多调用位置，您也可以创建一个简单的脚本来修复简单的情况：选择导入模块的所有文件，并且只有一个
包GetABC- 使用
原型不会将调用转换为sub-to-constant访问，因为该原型只会使sub可能符合内联条件。由于接头主体本身不是常数，因此此接头不能是常数（） - 开销是每个调用的开销，因为perl必须为每个调用做大量的簿记。因此，在XS中重写该访问器不会有多大帮助
- 创建
没有帮助，因为该常量是变量的副本，而不是别名常量
package Foo;
use strict;
use warnings;
use feature 'say';
my $x = 7;
BEGIN { $Foo::{GetX} = \$x } # don't try this at home
say GetX; #=> 7
$x = 3;
say GetX; #=> 3
如果函数调用开销确实难以承受（例如，占用了两位数的处理时间），那么自己在源代码中进行内联将是最好的选择。即使您有很多调用位置，您也可以创建一个简单的脚本来修复简单的情况：选择导入模块的所有文件，并且只有一个
包GetABC$Test:：ABC$Test:：ABC