Perl: dereferencing an array is using scalar context?

Question

I have a strange issue with Perl and dereferencing.

I have an INI file with array values, under two different sections e.g.

[Common]
animals =<<EOT
dog
cat
EOT

[ACME]
animals =<<EOT
cayote
bird
EOT

I have a sub routine to read the INI file into an %INI hash and cope with multi-line entries.

I then use an $org variable to determine whether we use the common array or a specific organisation array.

@array = @{$INI{$org}->{animals}} || @{$INI{Common}->{animals}};

The 'Common' array works fine, i.e. if $org is anything but 'ACME' I get the values (dog cat) but if $org equals 'ACME'` I get a value of 2 back?

Any ideas??

ikegami · Accepted Answer · 2012-08-24 11:39:08Z

6

Derefencing arrays is of course not forcing scalar context. But using || is. Therefore things like $val = $special_val || "the default"; work just fine while your example doesn't.

Therefore @array will contain either a single number (the number of elements in the first array) or, if that is 0, the elements of the second array.

The perlop perldoc page even lists this example speficially:

In particular, this means that you shouldn't use this for selecting
between two aggregates for assignment:

    @a = @b || @c;              # this is wrong
    @a = scalar(@b) || @c;      # really meant this
    @a = @b ? @b : @c;          # this works fine, though

Depending on what you want, the solution could be:

my @array = @{$INI{$org}->{animals}}
   ? @{$INI{$org}->{animals}}
   : @{$INI{Common}->{animals}};

edited Aug 24, 2012 at 11:39

ikegami

391k17 gold badges291 silver badges555 bronze badges

answered Aug 24, 2012 at 11:31

user507077

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

1 Comment

andyml73 Over a year ago

Thanks, spot on, don't how I coped before I found this site :) .

Collectives™ on Stack Overflow

Perl: dereferencing an array is using scalar context?

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related