Question

I’m using several arrays of identical structure in a Perl program, and at some point, I need to output there names. I.e., I need to get 'array_name' from @array_name.
How can I do it? If it’s impossible, can you suggest any convenient way of “relative” storing of arrays and their names?
Thank you.

Answer 1

It is certainly possible, but I’d recommend to store your arrays as anonymous array references in a hash:

my %arrays = (
    'array_name' => [ qw(contents of array array_name) ],
    # etc
)

Then, to retrieve an array with name $some_array_name:

my @array = @{$arrays{"$some_array_name"}};