在 Perl 中设置数组名称

Question

我想在 Perl 中创建一个数组，其名称为两个变量的值，并且这两个变量之一的值将从文件中读取。

在简化的情况下，当 P 和 CC 是两个单独的变量时，如何创建名称为 CCP 的数组？

到目前为止我加入了两个使用：

my $body='CC';
my $letter='P';
my $joined=$body . "$venue";

但我实际上想创建一个名称为 @CCP 的数组。我的想法是，我将从数据文件中读取不同的字母，然后创建数组，这些数组的名称是通过将 'CC' 连接到从文件中读取的字母来给出的。

Answer 1

你真的不想那样做。当您需要访问数组时，您如何知道调用它的是什么？

像这样使用散列

my %data;

my $body   = 'CC';
my $letter = 'P';

$data{"$body$letter"} = [];