Início / unix / Perguntas / 529658
Accepted
Paolo Lorenzini
Asked: 2019-07-12 10:48:44 +0800 CST

Substitua a substring de caracteres por awk e sed

  • 772

Eu tenho um arquivo que contém uma string muito longa de caracteres e gostaria de substituir uma substring dele por Ns. Exemplo:

teste

ABCDABCDABCD

Eu gostaria de substituir uma substring dela por todas as letras N com o comando awk e sed, todos os caracteres do índice 5 a 8, então o comprimento total da letra N é 4.

Resultado

ABCDNNNNABCD

Eu tentei algo assim:

awk '{ v=substr($0,5,4); sed -i "s/$v/N/g";print substr($0,1,4)""v""substr($0,9,12)}' test

no entanto, este comando parece dar esta saída:

ABCDABCDABC

E nenhuma substituição foi feita

Eu gostaria de ter no código o número do índice de onde começar a substituição, (aqui, por exemplo, é 5) e o número do comprimento da substituição (aqui 4), para que eu possa modificar esses números caso Eu quero começar em outra posição e para um comprimento diferente de substituições porque, na realidade, tenho uma string com milhares de letras e quero substituir centenas de caracteres, então a substituição de padrão não funciona no meu caso

linux text-processing

5 respostas

  1. Best Answer

    Com GNU awk, você pode fazer

    gawk -v start=5 -v end=8 '{
    mid = substr($0, start, end-start+1)
    print substr($0, 1, start-1) gensub(/./, "N", "g", mid) substr($0, end+1)
}' file

    Ou com perl

    perl -spe 'substr($_, $start-1, $end-$start+1) =~ s/./N/g' -- -start=5 -end=8 file

    Com ambas as soluções, passamos os valores inicial e final para o programa com opções de linha de comando. Isso facilita a alteração dos valores de dentro de um script de shell. Se você precisar tornar o caractere de substituição N dinâmico também, deve ser bastante óbvio como.

    • 3

  2. Se você tiver GNU awk (gawk), você pode definir FIELDWIDTHSpara dividir a linha em campos com base nas posições dos caracteres. Isso é particularmente conveniente para o seu caso na versão gawk >= 4.2, que suporta uma largura de campo à direita "curinga". Você pode então substituir caracteres no segundo campo usando gsub:

    echo ABCDABCDABCD | ./gawk -v i=5 -v n=4 '
  BEGIN {FIELDWIDTHS = sprintf("%d %d *", i-1, n)} 
  {gsub(/./,"N",$2)} 1
' OFS=""
ABCDNNNNABCD

    Em versões mais antigas do gawk, você pode simular *escolhendo um tamanho máximo adequado para o campo à direita:

    echo ABCDABCDABCD | gawk -v i=5 -v n=4 '
  BEGIN {FIELDWIDTHS = sprintf("%d %d 65536", i-1, n)} 
  {gsub(/./,"N",$2)} 1
' OFS=""
ABCDNNNNABCD

    Ver

    Processando dados de largura fixa

    Capturando dados de rastreamento opcionais

    • 2

  3. Usando sed

    Para substituir os caracteres de 5 a 8 por N:

    $ sed -E 's/(.{4}).{4}/\1NNNN/' test
ABCDNNNNABCD

    Como funciona:

    • (.{4})captura os primeiros quatro caracteres do grupo 1.

    • .{4}corresponde aos próximos quatro caracteres.

    • \1NNNNsubstitui o acima com o grupo 1 e quatro N.

    Usando GNU awk

    $ gawk -F "" '{for (i=5; i<=8; i++) $i="N"} 1' OFS="" test
ABCDNNNNABCD

    Como funciona:

    • -F ""diz ao awk para tratar cada caractere como um campo separado.

    • for (i=5; i<=8; i++) $i="N"faz um loop sobre cada caractere de 5 a 8 e o altera para N.

    • 1diz ao awk para imprimir a linha.

    • 1

  4. Você pode fazer isso empregando os seguintes métodos como mostrado com POSIX ou GNU seds

    Com o editor sed:

    $ L=5 R=8
$ sed -e '
   s/./\n/'"$L"';s//\n/'"$R"';ta
   :a;s/\n\n/NN/;t
   s/\n./N\n/;ta
' ./test

ABCDNNNNABCD

    Com Perl:

    perl -lspe '
   my $c = $idxr - (pos()=$idxl-1);
   s/\G.{$c}/"N"x$c/e;
' -- -idxl=5 -idxr=8 ./test

ABCDNNNNABCD
    • 0

  5. Você pode apenas tentar com o comando abaixo

     echo "ABCDABCDABCD"| sed "s/ABCD/NNNN/2"

    resultado

    ABCDNNNNABCD
    • 0

relate perguntas