Re: How to accumulate Hashes of Array value with the same key?
On Thu, 30 Sep 2004 17:03:40 -0400, Dave Gray [EMAIL PROTECTED] wrote:
I'm not sure what you want to do here... do you want to combine all
the values into one array reference, stored in $HoA{key1}?
As you mention above. That is exactly what I mean:
This sounds like it's part of a bigger question. Can you give us some
more background info?
What I am trying to do is to accumulate, every new HoA generated
into existing HoA, and join the values if they have the same key.
Dave
Regards,
Edward WIJAYA
SINGAPORE
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
On Thu, 30 Sep 2004 14:23:47 -0300, Shaw, Matthew [EMAIL PROTECTED]
wrote:
Thanks Matt,
my %HoA = (key1 = ['A',1]);
my %HoA2 = (key1 = ['B',2]);
my %HoA3 = (key1 = ['C',2]);
into:
Only this one works
push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}});
Not this
Sorry this should read:
@{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA3{key1}});
However what it gives is that it create one single array,
and not preserving the array that group ['A',1] etc, like before
namely:
print Dumper \%HoA;
$VAR1 = {
'key1' = [
'A',
1,
'B',
2,
'C',
2
]
};
not;
$VAR1 = { 'key1' = ['A',1],['B',2],['C',2]};
Regards,
Edward WIJAYA
SINGAPORE
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
Edward Wijaya wrote on 01.10.2004:
On Thu, 30 Sep 2004 14:23:47 -0300, Shaw, Matthew [EMAIL PROTECTED]
wrote:
Thanks Matt,
my %HoA = (key1 = ['A',1]);
my %HoA2 = (key1 = ['B',2]);
my %HoA3 = (key1 = ['C',2]);
into:
Only this one works
push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}});
Not this
Sorry this should read:
@{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA3{key1}});
However what it gives is that it create one single array,
and not preserving the array that group ['A',1] etc, like before
namely:
print Dumper \%HoA;
$VAR1 = {
'key1' = [
'A',
1,
'B',
2,
'C',
2
]
};
not;
$VAR1 = { 'key1' = ['A',1],['B',2],['C',2]};
So you want a hash of an array of arrays, right? This is adding another level of
encapsulation.
So you could do this
#get the actual length of your target array and add one
$array_element = $#HoA{key1}++;
#push the new list of values into a new array inside the HoA
push $HoA{key1}-[$array_element], @{$HoA2{key1}}
Or did I get you wrong?
- Jan
--
There's no place like ~/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
Edward Wijaya wrote on 01.10.2004:
On Thu, 30 Sep 2004 14:23:47 -0300, Shaw, Matthew [EMAIL PROTECTED]
wrote:
Thanks Matt,
my %HoA = (key1 = ['A',1]);
my %HoA2 = (key1 = ['B',2]);
my %HoA3 = (key1 = ['C',2]);
into:
Only this one works
push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}});
It is valid Perl code, but it should not have the desired effect. Note the double
reference to HoA2, corrected below.
Not this
Sorry this should read:
@{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA3{key1}});
- Jan
--
There are 10 kinds of people: those who understand binary, and those who don't
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
$VAR1 = { 'key1' = ['A',1],['B',2],['C',2]};
That isn't going to do what you think it is... What you're asking for
there is to use the ['B', 2] array reference as a hash key...
$VAR1 = {
'ARRAY(0x804ca54)' = ['C',2],
'key1' = ['A',1]
};
In order to get close to what I think you're trying to describe, you'd
have to have another array reference and stuff those three arrays in
there.
$HoA = ( key1 = [
['A',1], ['B',2], ['C',3]
]);
Which is clunky when you want to detect duplicates, which is why I
suggested the hash.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
On Fri, 1 Oct 2004 10:51:50 -0400, Dave Gray [EMAIL PROTECTED] wrote:
$VAR1 = { 'key1' = ['A',1],['B',2],['C',2]};
That isn't going to do what you think it is... What you're asking for
there is to use the ['B', 2] array reference as a hash key...
$VAR1 = {
'ARRAY(0x804ca54)' = ['C',2],
'key1' = ['A',1]
};
Actually, the string representation of the ['B',2] is what gets used,
so the actual ['B',2] array gets thrown away.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
On Fri, 1 Oct 2004 10:51:50 -0400, Dave Gray [EMAIL PROTECTED] wrote: $HoA = ( key1 = [ ['A',1], ['B',2], ['C',3] ]); Which is clunky when you want to detect duplicates, which is why I suggested the hash. I think you are right Dave. I will follow your suggestion. Regards, Edward WIJAYA -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response
RE: How to accumulate Hashes of Array value with the same key?
I have thre HoAs with the same key but different value.
How can I efficiently join the HoA:
my %HoA = (key1 = ['A',1]);
my %HoA2 = (key1 = ['B',2]);
my %HoA3 = (key1 = ['C',2]);
into:
%HoA = (key1 = ['A',1],['B',2],['C',2]);
push @{$HoA{key1}}, ( @{$HoA2{key1}}, @{$HoA2{key1}});
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Re: How to accumulate Hashes of Array value with the same key?
I have thre HoAs with the same key but different value.
How can I efficiently join the HoA:
my %HoA = (key1 = ['A',1]);
my %HoA2 = (key1 = ['B',2]);
my %HoA3 = (key1 = ['C',2]);
into:
%HoA = (key1 = ['A',1],['B',2],['C',2]);
I'm not sure what you want to do here... do you want to combine all
the values into one array reference, stored in $HoA{key1}? Or do you
want $HoA{key1} to be an array of arrays?
Another solution might be to use a hash of hashes:
%HoA = (
key1 = {
A = 1,
B = 2,
C = 3
}
);
This sounds like it's part of a bigger question. Can you give us some
more background info?
Dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
