mod_ssl не устанавливается

Вот какой-то перл "строка -шумный":

perl -lane '
        for $f (@F) {push @{$x{$f}}, $.}                          # 1.
    } END {
        use List::Util qw/any first/;
        sub sort_by_count_desc {
            map  { $_->[0] } 
            sort { $b->[1] <=> $a->[1] || $a->[0] <=> $b->[0] } 
            map  { [$_, scalar(@{$x{$_}})] } 
            @_ 
        }
        @ordered = sort_by_count_desc(keys %x);                   # 2.
        %result = ();
        for ($i=1; $i<=$.; $i++) {                                # 3.
            $node = first { any {$_ == $i} @{$x{$_}} } @ordered;  # 4.
            $result{$node} = 1;
        }
        print join "\n", sort_by_count_desc(keys %result);
' df

Где

1. перебирает строки файла и сопоставляет каждое значение со списком строк, в которых оно появляется
2. создает упорядоченную строку значений, отсортированных по размеру списка явок по убыванию
3. перебирает диапазон номеров строк и foreach номер строки
4. находит первое значение, для которого появляется номер строки

Этот вывод

1
2
4
10