Получение ping-пакетов, несмотря на блокировку входящих ping-пакетов

Вы можете сделать что-то вроде:

 max {max = l; s = $0}
        END {print s}'

Мы сортируем ввод, используя сравнение байтов -и -байтов(sortв локали C ), что гарантирует, что строки с самым длинным общим префиксом являются смежными.

sedнаходит самый длинный общий префикс между одной строкой и следующей, используя обратную связь BRE -ссылки (\(.*\).*\n\1, представляющие собой захваченную последовательность символов \(.*\), за которой следует любое количество символов .*, символ новой строки \nи та же последовательность символов, что была зафиксирована ранее \1), которую мы печатаем.

awkнаходит самый длинный из них (выбирает первый во входных данных, если их несколько, поэтому он будет первым в лексическом порядке. Используйте >=вместо >, чтобы получить последний ).

Обратите внимание, что он находит самый длинный общий префикс с точки зрения символов . Чтобы получить его в виде байтов , установите $LC_ALLна Cдля всех 3 команд, а не только sort. Тогда, например, в UTF -8 локалей, вместо того, чтобы найти 2 символа Stкак самый длинный общий префикс между Stéphaneи Stábat, он найдет 3 байта,St<0xc3>, где <0xc3>является первой половиной символов áи é.

В терминах расширенного графемного кластера . Например, так что между Stepsи Stéphane(, где éвыражается как двухсимвольный кластер графем e\u0301), он находит Stвместо Ste, вы можете прибегнуть кperl:

}
    if ("$prev$_" =~ /^(\X*).*\n\1\b{g}/) {
      $l = length($1);
      if ($l > $max) {$max = $l; $s = $1}
    }
    $prev = $_;
    END{print "$s\n"}'

(, где \Xсоответствует расширенному кластеру графемы , а \b{g}— границе расширенного кластера графемы (, для которой вам нужен perl 5.22.1 или новее )).

Если вы хотите найти самый длинный общий префикс всех строк во вводе (, а не только любых 2 строк во вводе ), как я изначально думал вы спрашивали, это ответили на другие вопросы и ответы здесь .