Perl dereferencing array for specific value

Question

So, in Perl, I have an array within an object (so, a reference to an array), and I want to find the first value of that array.

I find myself using code like the following quite often:

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

That works, but I'm sure I could do this without all the intermediate lines and variables.

Can someone help me with the syntax?

Gabriel Ross · Accepted Answer · 2011-08-09 14:47:28Z

6

Try:

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

answered Aug 9, 2011 at 14:47

Gabriel Ross

5,2281 gold badge32 silver badges30 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

hobbs Over a year ago

All of the arrows after the first are optional. You can write it that way if you want, but you'll be more likely to find $self->{source_env}{server}[0] in code on CPAN.

Patrick B. · Accepted Answer · 2011-08-09 14:47:32Z

0

Try $server_ref->[0], it should work.

answered Aug 9, 2011 at 14:47

Patrick B.

12.6k9 gold badges64 silver badges108 bronze badges

Collectives™ on Stack Overflow

Perl dereferencing array for specific value

2 Answers 2

1 Comment

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

1 Comment

Comments

Your Answer

Sign up or log in

Post as a guest

Related