Select Code to Download

for my $user ((sort { $users{$b}->{count} <=> $users{$a}->{count} } ke
+ys %users) {
   blah blah...
}

Global symbol "$user" requires explicit package name at

my @sorted_users = sort { $users{$b}->{count} <=>
    $users{$a}->{count} } keys %users;
for (@sorted_users) {
    blah... blahh
}