Como contar o número de caracteres em uma linha, exceto um caractere específico?

Este é um arquivo de peça

N W N N N N N N N N N
N C N N N N N N N N N
N A N N N N N N N N N
N N N N N N N N N N N
N G N N N N N N N N N
N C N N N C N N N N N
N C C N N N N N N N N

Em cada linha, quero contar o número total de todos os caracteres que não são "N"

meu desejo de saída

1
1
1
0
1
2
2

Solução GNU awk :

awk -v FPAT='[^N[:space:]]' '{ print NF }' file

• FPAT='[^N[:space:]]'- o padrão que define um valor de campo (qualquer caractere, exceto Nchar e espaço em branco)

A saída esperada:

1
1
1
0
1
2
2

awk '{ gsub("[ N]",""); print length() }'

assumindo que a contagem é necessária para cada linha que não seja o caractere de espaço e N

$ perl -lne 'print tr/N //c' ip.txt 
1
1
1
0
1
2
2

• o valor de retorno tré quantos caracteres foram substituídos
• c para complementar o conjunto de caracteres dados
• Observe o uso da -lopção, retira o caractere de nova linha da linha de entrada para evitar erros de um por um e também adiciona caracteres de nova linha para a instrução print

Uma solução mais genérica

perl -lane 'print scalar grep {$_ ne "N"} @F' ip.txt 

• -aopção para dividir automaticamente a linha de entrada em espaços em branco, salvos na @Fmatriz
• grep {$_ ne "N"} @Fretorna a matriz de todos os elementos nos @Fquais não corresponde à stringN
  • equivalente regex seria grep {!/^N$/} @F
• use of scalardará número de elementos da matriz

Solução alternativa do awk :

awk '{ print gsub(/[^N[:space:]]/,"") }' file

• gsub(...)- A gsub()função retorna o número de substituições feitas.

A saída:

1
1
1
0
1
2
2

Outra awkabordagem (retornará -1 para linhas vazias).

awk -F'[^N ]' '$0=NF-1""' infile

Ou no complexo, ele retornará -1 nas linhas vazias, 0 nas linhas de espaços em branco (tabulações / espaços).

awk -F'[^N \t]+' '$0=NF-1""' infile

1. tre shell script POSIX :

   tr -d 'N ' < file | while read x ; do echo ${#x} ; done
   

2. bash,, kshe zsh:

   while read x ; do x="${x//[ N]}" ; echo ${#x} ; done < file
   

Uma pequena combinação de tre awk:

$ tr -d ' N' <file.in | awk '{ print length }'
1
1
1
0
1
2
2

Isso exclui todos os espaços e Ns do arquivo de entrada e awkapenas imprime o comprimento de cada linha.

Outra maneira fácil é fazê-lo em python, que vem pré-instalado na maioria dos ambientes unix. Solte o seguinte código em um arquivo .py:

with open('geno') as f:
    for line in f:
        count = 0
        for word in line.split():
            if word != 'N':
                count += 1
        print(count)

E então faça:

python file.py

Do seu terminal. O que o acima faz é:

• para cada linha em um arquivo chamado "geno"
• defina um contador para 0 e aumente cada vez que encontrarmos um valor! = 'N'
• quando chegar ao fim da linha atual, imprima o contador e vá para a próxima linha