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

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?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://777925]
help
Chatterbox?
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
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    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.