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];