Hello ameezys,
From your initial description I believed also as other fellow Monks that you are looking for ARRAYS OF ARRAYS. Based on your updated description it looks that you are looking for HASHES OF ARRAYS.
Sample of code below:
#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;
my %HoA = ( N1 => [undef],
N2 => [undef],
N3 => [undef],
N4 => [undef] );
print Dumper \%HoA;
# add to an existing row
push @{ $HoA{"N1"} }, "A", "B";
print Dumper \%HoA;
__END__
$ perl test.pl
$VAR1 = {
'N3' => [
undef
],
'N2' => [
undef
],
'N1' => [
undef
],
'N4' => [
undef
]
};
$VAR1 = {
'N3' => [
undef
],
'N2' => [
undef
],
'N1' => [
undef,
'A',
'B'
],
'N4' => [
undef
]
};
Is it possible to be looking for HASHES OF HASHES?
Hope this helps, let us know if this is not what you are looking for.
Seeking for Perl wisdom...on the process of learning...not there...yet!
|