Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: Array reference problem

by davorg (Chancellor)
on Jul 07, 2009 at 16:16 UTC ( [id://777925]=note: print w/replies, xml ) Need Help??

in reply to Array reference problem

I am working with a program in which some arrays must be accessed based on their names.

You really don't want to do that. No, I mean you really don't want to do that. use strict makes symbolic references illegal for a reason.

There are a tiny number of advanced techniques where you need to use symbolic references. This isn't one of them.

In this case, what you really want is a hash.

#!/usr/bin/perl use strict; use warnings; my %descriptor_array = ( 1 => [ 1, 2, 3, 4 ], 2 => [ 1, 2, 3, 4 ], 3 => [ 1, 2, 3, 4 ], 4 => [ 1, 2, 3, 4 ], ); foreach my $array_no (1 .. 4) { print "$array_no: @{$descriptor_array{$array_no}}\n"; }

If you alter your code to use a model like this then you'll be far happier.

perldsc will probably be useful to you.


See the Copyright notice on my home node.

Perl training courses

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://777925]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (3)
As of 2024-06-15 22:35 GMT
Find Nodes?
    Voting Booth?

    No recent polls found

    erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.