%hash = (
     www.yahoo.com => 10,
     www.google.com => 2000,
  );

  for ( sort { $hash{$a} <=> $hash{$b} } keys %hash )
  {
    print "$_ appears: $hash{$_} time(s)\n";
  }