Hi thor,
right. testcase will be unique. but the array of hashes gets appended again and again.
how to maintain uniqueness with the data in the array elements.
also one more question here, how to push hashes to each testcase.
| [reply] |
Well...you are using the push function and an array. If you want only one thing to be stored at that location, you'll want something like (untested):
$hoh{$component}{$cmd}{$testcase} =
{ testsuite_type => $testsuite_type,
platform_type => $platform_type,
view => $view_type }
thor
Feel the white light, the light within
Be your own disciple, fan the sparks of will
For all of us waiting, your kingdom will come
| [reply] [d/l] [select] |
this worked for me.
thanks a lot.
rsennat
| [reply] |
use warnings;
use strict;
use Data::Dumper;
my %hoh;
while (<DATA>)
{
my @items = split ' ';
push @{$hoh{'this'}->{'that'}->{'theOther'} }, [@items];
}
print Dumper (\%hoh);
__DATA__
eggs bacon cheese
tomatoes potatoes onions
beans peas cabbage
Perl is Huffman encoded by design.
| [reply] [d/l] [select] |