From 0e19c374f7a1d33169ac747ec51c0728e8b3f776 Mon Sep 17 00:00:00 2001 From: "Bradley M. Kuhn" Date: Tue, 13 Sep 2011 12:07:31 -0400 Subject: [PATCH] Ascending sort. --- oggcast-count.plx | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/oggcast-count.plx b/oggcast-count.plx index fc94358..3ee33e9 100755 --- a/oggcast-count.plx +++ b/oggcast-count.plx @@ -33,7 +33,7 @@ while (<>) { $data{$url}{__TOTAL__}++; } -foreach my $url (sort { $data{$a}{__TOTAL__} <=> $data{$b}{__TOTAL__}} +foreach my $url (sort { $data{$b}{__TOTAL__} <=> $data{$a}{__TOTAL__}} keys %data) { print "$url: $data{$url}{__TOTAL__}\n"; }