in reply to printing array item reference names
Let's store both the names for the arrays, and a ref to them:
use warnings; use strict; my @aaa = qw (11 22 33); my @bbb = qw (44 55 66); my @ccc = qw (77 88 99); my @masterarray = ([aaa => \@aaa], [bbb => \@bbb], [ccc => \@ccc]); print $$_[0], ": ", @{$$_[1]}, "\n" for @masterarray;
|
|---|