Perl解除引用特定值的数组

Question

所以,在Perl中,我在一个对象中有一个数组(所以,对数组的引用),我想找到该数组的第一个值.

我发现自己经常使用如下代码:

my $server_ref = $self->{source_env}->{server};
my @servers = @$server_ref;
my $main_server = $servers[0];

这是有效的,但我确信我可以在没有所有中间线和变量的情况下做到这一点.

有人可以帮我解释语法吗？

Answer 1

尝试:

my $main_server = $self->{source_env}->{server}->[0];