reter espaços em branco em campos ao usar o awk

Question

Estou usando nawk em um arquivo delimitado por pipe para imprimir campos como índice e chave, onde alguns dos campos contêm espaços em branco, quando não há espaço em branco, tudo funciona normalmente, mas, no caso de espaços em branco, awk trata-o como separador de campo e imprime este o / p para nova linha. Veja minha entrada abaixo:

Entrada:

a|b|c d e|1|2|3
a|b c|d|1|2|2 3

Saída:

Index=a|b|c 
Key=1|2|3
Index=d
Key=<null>
Index=e
Key=<null>
Index=a|b
Key=1|2|2
Index=c|d
Key=3

Resultado esperado:

Index=a|b|c d e
Key=1|2|3
Index=a|b c|d
Key=1|2|2 3

Em suma, para duas gravações 2 Index e 2 keys e manter os espaços em branco básicos como estão.

Eu tenho que usar abaixo do conjunto de códigos para trabalhar em cada linha, porque há muitos campos e dados enormes

    index='echo "$line" | nawk -F '|' '
    function select_from(from,to,delim)
    {
            if (to < from) { return; };
            for (i=from;i<=to;i++)
            {
                            if (NF < i) { break;};
                            if (i < to)
                            {
                                    printf("%s%s",i,delim);
                            } else {
                                    printf("%s",i);
                            };
            };
    }
    {select_from(11,48,"|");};''

a resposta está correta ao usar algum caractere especial em vez de espaço, mas isso não está correto nos dados de entrada. Então, quero saber se posso preservar o espaço neste processo.

    

Answer 1

Usando awk

from=1; to=3; delimiter="|"; awk -F"$delimiter" -v from="$from" -v to="$to" '!/^[[:blank:]]*$/ {printf "Index="; for(i=from; i<=to; i++) {printf $i; if(i<to) {printf "|"};} printf "\n"; printf "Key="; for(i=to+1; i<=NF; i++) {printf $i; if(i<NF) {printf "|"};} printf "\n"}' foo

Mais legível

from=1; to=3; delimiter="|";
awk -F"$delimiter" -v from="$from" -v to="$to" '!/^[[:blank:]]*$/ {
    printf "Index=";
    for(i=from; i<=to; i++) {
        printf $i;
        if(i<to) {
            printf "|"
        };
    }
    printf "\n";
    printf "Key=";
    for(i=to+1; i<=NF; i++) {
        printf $i;
        if(i<NF) {
            printf "|"
        };
    }
    printf "\n"
}' foo

Exemplo

$ cat foo
a|b|c d e|1|2|3
a|b c|d|1|2|2 3

$ from=1; to=3; delimiter="|"; awk -F"$delimiter" -v from="$from" -v to="$to" '!/^[[:blank:]]*$/ {printf "Index="; for(i=from; i<=to; i++) {printf $i; if(i<to) {printf "|"};} printf "\n"; printf "Key="; for(i=to+1; i<=NF; i++) {printf $i; if(i<NF) {printf "|"};} printf "\n"}' foo
Index=a|b|c d e
Key=1|2|3
Index=a|b c|d
Key=1|2|2 3

    

Answer 2

Você pode usar este comando perl para obter a saída esperada:

$ perl -ne 'print "Index=\nKey=\n" if /(.*?)[\s\|]([\|\d ]+)/' my_file
Index=a|b|c d e
Key=1|2|3
Index=a|b c|d
Key=1|2|2 3

Eu não usaria [nmg]awk para essa tarefa. Como o script principal parece estar escrito em bash , basta substituir o comando nawk :

#!/bin/bash

perl -ne 'print "Index=\nKey=\n" if /(.*?)[\s\|]([\|\d ]+)/' my_file

Note que você também pode remover o loop criando $line em seu script original.

    

Answer 3

Crie um arquivo e salve o script awk abaixo:

#!/usr/bin/awk -f

BEGIN { FS="|";} 
{ 
  printf"Index:";
  for(i=1;i<=NF;i++) {
       if ($i~/[[:alpha:]]/ && $(i+1)!~/[[:digit:]]/) { printf $i"|";
    }
    else if ($i~/[[:alpha:]]/ && $(i+1)~/[[:digit:]]/) {
    print $i
    }
  }

printf "\n"
} 


{ 
  printf"Key=:";
  for(i=1;i<=NF;i++) {
     if ($i~/[[:digit:]]/ && $(i+1)~/[[:digit:]]/) printf $i"|" ;
    else if ($i~/[[:digit:]]$/)  printf $i;

    }
printf "\n"
}  

Salve o arquivo, execute sudo chmod +x awk-script-name.awk e execute-o com o arquivo de teste da seguinte forma:

$ cat testfile.txt                                                                                                                    
a|b|c d e|1|2|3
a|b c|d|1|2|2 3

$ key-index-script.awk testfile.txt                                                                                                   
Index:a|b|c d e

Key=:1|2|3
Index:a|b c|d

Key=:1|2|2 3