Como apagar as colunas de um arquivo no qual há menos de 2 dígitos?

Question

Eu tenho um arquivo parecido com:

entrada:

112 1 2 01 1 
000 0 0 22 0
122 2 2 22 0

Desejo excluir as colunas nas quais há menos de dois dígitos em cada linha. Então, a saída deve parecer:

112 01
000 22
122 22

alguma sugestão? note que o arquivo real é enorme.

    

Answer 1

Uma maneira possível, com perl:

perl -alne 'print join " ", grep { length > 1 } @F' file

    

Answer 2

Você pode fazer isso com sed (ou ferramentas mais capazes, como awk ou perl).

Por exemplo

  sed -e :loop \
        -e 's/^[0-9]\{1\} //' \
        -e 's/ [0-9]\{1\}$//' \
        -e 's/ [0-9]\{1\} / /g' \
        -e 't loop' <input >output