如何在perl脚本中绑定每个变量？

Question

我希望在创建/访问/销毁perl脚本中的变量时看到每个地方

使用tie或可轻松到达Variable::Magic

但是如何在创建变量时自动应用此魔法？

Answer 1

您可以查看 B::Xref，它会生成应用程序中所有变量的交叉引用列表。基本上，您需要遍历字节码来查找所有变量声明/初始化。您还可以更改字节代码，即添加代码来绑定变量。然而，我无法给你举一个例子，因为这种情况很少发生。

作为替代方案，您可以使用代码过滤器来添加 tie() 指令。但是，代码过滤器不能保证正确识别变量声明/初始化。