Re^2: String sorting in Perl


Come for the quick hacks, stay for the epiphanies.
	PerlMonks

by Limbic~Region (Chancellor)

on Jun 04, 2014 at 17:38 UTC ( [id://1088695]=note: print w/replies, xml )

Need Help??

Laurent_R,
And you're done.

It appears the OP is interested in getting the values out in descending order (sorted).

for my $line (sort {$count_hash{$b} <=> $count_hash{$a}} keys %count_h
+ash) {
    print "$line $count_hash{$line}\n";
}
[download]

Cheers - L~R

Comment on Re^2: String sorting in Perl Download Code

Replies are listed 'Best First'.
Re^3: String sorting in Perl by Laurent_R (Canon) on Jun 04, 2014 at 17:48 UTC
Yes, Limbic~Region, you're right ++, that's why I updated the post immediately after I posted it, but you saw it before I posted the change. Having said that, my understanding on how the sort should be carried out is not exactly the same as yours (I explained it in my update).	[reply]
Re^4: String sorting in Perl by Limbic~Region (Chancellor) on Jun 04, 2014 at 18:06 UTC
Laurent_R, The code should get the counts, order them with the highest counts first, then move to the next value. I didn't see anything that implied shorter strings should come first but I agree that "move to the next value" is fairly ambiguous. Cheers - L~R	[reply]

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://1088695]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others imbibing at the Monastery: (5)

As of 2024-04-24 06:13 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

No recent polls found