So I am trying to sort the inner hash(VBP, IN, VB, ...) value by ascending order I don't care for sorting the outer hash.
This is what I get out of what I implemented
$VAR1 = {
'like' => {
'VBP' => '0.0882352941176471',
'IN' => '0.823529411764706',
'VB' => '0.0882352941176471'
},
'kind' => {
'JJ' => '0.2',
'NN' => '0.8'
},
'distribution' => {
'NN' => '1'
},
'successful' => {
'JJ' => '1'
},
'capped' => {
'JJ' => '0.666666666666667',
'VBN' => '0.333333333333333'
},
...
This is my code snippet
for $key( keys %bigrams)
{
for $secKey ( sort { $bigrams{$key}{$a} <=> $bigrams{$key}{$b}
+ } keys %{ $bigrams{$key} } )
{
$bigrams{$key}{$secKey} = ($bigrams{$key}{$secKey}) / ($fr
+eqs{$key});
}
}
I've tried other examples on this site and it have yet to work.
Thanks.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.