如何在perl中更改常量的值

时间:2011-03-01 14:11:32

标签: perl

our $TEST;    *TEST = \100;
$TEST =200

出于特定原因,我想将TEST的值更改为200。是否有可能改变它?

4 个答案:

答案 0 :(得分:2)

您可以使用相同的语法:*TEST = \200
顺便说一句,你可能想看看Const::Fast

答案 1 :(得分:2)

尝试添加此声明:

local $TEST = 200;

答案 2 :(得分:0)

如果你确实使用constansts然后使用常量值,那么在搞乱它之前记住Perl通常会优化掉常量代码 - 也就是说跳过一个if条件,表示 - 如果(DEBUG)或硬编码一个值(例如PI)在其中间字节代码生成期间。 constant pragma

答案 3 :(得分:0)

这不是在perl中执行常量的写方法。正确的方法是

use constant TEST => 100;

现在,如果它是在模块中声明的,并且您想更改测试中的值,则可以放置

use unconstant;

在顶部,然后可以再声明另一个。

use unconstant;
use MyLib;
use constant *MyLib::TEST => 200;

我是unconstant

的作者