Como editar este comando para adicionar outro recurso?

Question

Tenho abaixo os comandos para extrair apenas as linhas que serão duplicadas consecutivas duas ou mais vezes. Quero editar esses comandos sed e perl para excluir o primeiro e o segundo caractere do fim de uma linha. duplicado.

perl -lne 'print if /^((.)+(?!))+$/' 
sed -Ee '/^((.)+)+$/!d' input.txt

Eu quero imprimir apenas as linhas com todos os caracteres repetidos consecutivamente, exceto o último ou os dois últimos caracteres na mesma linha. Caracteres consecutivos não consecutivos são permitidos, mas somente se forem 1º ou 2º do final de uma linha do meu arquivo de texto grande.

Por exemplo, o arquivo de entrada contém:

111224
447758
1122323
15225168
55226565

O arquivo de saída deve conter:

111224    (only last character is not consecutively repeated)
447758    (only the last two characters are not consecutively repeated)

Obrigado

    

Answer 1

Com base na minha resposta de uma pergunta anterior:

sed -En 'h;:a;s/^(.)+//;ta;/^.{1,2}$/{x;p}' file