имена, которые встречаются наибольшее количество раз в наборе данных

Question

users     directory
----------------------
hjsyeh    hellodir ;
awgshd    newdir;
hjsyeh    hidir;
jkdhjk    welcomedir

Выше приведены наборы пользователей и каталогов, которые они создали. Как я могу получить сумму пользователей с большим количеством каталогов, созданных в скрипте оболочки Unix?

мой вывод должен быть

hjsyeh -2 directories

Answer 1

Вы можете использовать

echo "hjsyeh hellodir ; awgshd newdir; hjsyeh hidir; jkdhjk welcomedir" | \
 sed -e "s/;\s*/\n/g" | awk '{print $1 }' | sort | uniq -c 

Его вывод:

  1 awgshd
  2 hjsyeh
  1 jkdhjk

РЕДАКТИРОВАТЬ: Вывод в запрошенном формате с помощью другого вызова awk:

echo "hjsyeh hellodir ; awgshd newdir; hjsyeh hidir; jkdhjk welcomedir" |                                                                
  sed -e "s/;\s*/\n/g" | awk '{print $1 }' | sort | uniq -c | 
  awk '{ printf "%s -%s directories\n" , $2 , $1  }'

выход:

awgshd -1 directories
hjsyeh -2 directories
jkdhjk -1 directories

Answer 2

Решение perl:

$ perl -anle '
    $h{$F[0]}++;
    END {
        $key_max = (sort { $h{$b} <=> $h{$a} } keys %h)[0];
        print "$key_max - $h{$key_max} directories";
    }
' file
hjsyeh - 2 directories

Это решение будет хорошо работать, если ваши данные небольшие. С большим файлом вам следует использовать встроенные функции perl each, keys, valuesдля итерации по хешу:

$ perl -anle '
    $h{$F[0]}++;
    END {
        while (($k,$v) = each %h) {
          if ($v > $max_val) {
              $max_key = $k;
              $max_val = $v;
          }
      }
      print "$max_key - $max_val directories";
    }
' file
hjsyeh - 2 directories