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>




Reply via email to