display_results(@sorted, $num);


sub display_results (@$) {
  my @sorted = @_;
  my $number = $_;
  my $count = 0;

  print("User      Disk Usage           \n");
  print("====      =====================\n");

  foreach (@sorted) {
      printf ("Hello  %10d %s\n", $size{$_}, $_);
      $count++;
         if ($count > $num) {
          exit;
      }
  }   }