perl - 在Perl中，如何使用字符串作为变量名？

Question

这个问题已经在这里有了答案:




已关闭10年。

Possible Duplicate:
How can I use a variable as a variable name in Perl?

这可行吗？我需要将字符串更改为变量。

例子:

如果我有这样的变量:

$this_is_test = "what ever";
$default = "this";
$default = $default . "_is_test";

我希望 $default接受 $this_is_test的值。

Answer 1

按照my other answer的说法，每当您发现在变量名中添加字符串后缀时，请改用哈希:

my %this = (
    is_test => "whatever",
    is_real => "whereever",
);

my $default = $this{is_test};

print "$default\n";

请勿为此目的使用符号引用，因为它们是不必要的，并且在您的问题中可能非常有害。有关更多信息，请参阅 Why it's stupid to 'use a variable as a variable name'?的 part 2， part 3和 mjd。