Как изменить значение константы в perl

Question

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

Я хочу изменить значение TEST на 200 по определенным причинам.Можно ли это изменить?

Answer 1

Попробуйте добавить это утверждение:

local $TEST = 200;

Answer 2

Вы можете использовать тот же синтаксис: *TEST = \200
Кстати, вы можете посмотреть на Const::Fast.

Answer 3

Если вы используете константы, а затем используете постоянное значение, то перед тем, как возиться с ним, помните, что Perl обычно оптимизирует удаление постоянного кода - то есть, возможно, пропускает условие if, которое говорит - if (DEBUG), или жестко кодирует значение (напримерPI) во время генерации промежуточного байтового кода. постоянная прагма