Comment je peux joindre deux par deux colonnes en utilisant un shell

J'ai 10 colonnes dans mon input, par exemple, et je veux ma sortie avec 5 colonnes. Plus précisément, je voulais join les colonnes 1 et 2, colonnes 3 et 4, colonnes 5 et 6, etc.

Mon input comme comme:

ID01 1 2 0 1 2 0 1 0 ID02 1 0 1 0 1 0 1 0 ID03 2 1 0 2 1 0 2 1 ID04 5 0 5 0 5 2 1 2 

Et je voulais mon input comme comme:

 ID01 12 01 20 10 ID02 10 10 10 10 ID03 21 02 10 21 ID04 50 50 52 12 

Pour ce faire, j'ai essayé: perl -alne 'print join "", $F[0], split(" ", $F[1])' data Mais je ne sais pas comment split par deux à deux caractères / colonne . Mes données réelles ont une centaine de milliers de colonnes.

    Supprimer tout autre espace:

     perl -pe 's/ (\S+) / $1/g' 
    • \S signifie "pas des espaces".

    Avec awk :

     awk '{ print $1, $2 $3, $4 $5, $6 $7, $8 $9 }' /path/to/input