my @AoH = ( { values => ['AGCGGGGAG','AGCGGGGCG','AGCCGGGCG','AGCCAGGAG'] }, { values => ['AGCGGAGCG','AGCCGAGGG','AGCGGAGGG'] }, );
for ( 0..$#AoH ) { $AoH[$_]->{ic} = compute_ic( @{ $AoH[$_]->{values} } ); }
print Dumper @AoH;
Thanks Gunnar, I managed to construct the Array of Hashes (@AoH) - Glad I did that! Now, I don't have the clue of how to sort these hashes, according to IC value and No of elements.
Currently this snippet printed out unsorted hash..
____BEGIN_______ for my $i(0..$#AoH) { for my $on_ic (keys %{$AoH[$i]}) { #LINE 2 print "@{ $AoH[$i]->{values} }", " ","$AoH[$i]->{ic}\n"; } } ____END____________
I also tried to ammend LINE 2 to sort according to IC with this:
for my $on_ic (sort {$AoH[$i]->{ic}{$a}<=>$AoH[$i]->{ic}{$b}} keys %{$AoH[$i]})
Doesn't work as well.
Badly hope to hear from you again.
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>