AskOverflow.Dev

AskOverflow.Dev Logo AskOverflow.Dev Logo

AskOverflow.Dev Navigation

  • Início
  • system&network
  • Ubuntu
  • Unix
  • DBA
  • Computer
  • Coding
  • LangChain

Mobile menu

Close
  • Início
  • system&network
    • Recentes
    • Highest score
    • tags
  • Ubuntu
    • Recentes
    • Highest score
    • tags
  • Unix
    • Recentes
    • tags
  • DBA
    • Recentes
    • tags
  • Computer
    • Recentes
    • tags
  • Coding
    • Recentes
    • tags
Início / unix / Perguntas / 432151
Accepted
αғsнιη
αғsнιη
Asked: 2018-03-20 10:32:41 +0800 CST2018-03-20 10:32:41 +0800 CST 2018-03-20 10:32:41 +0800 CST

remover padrão/entradas duplicadas dentro de cada campo no arquivo CSV

  • 772

Como removo entradas duplicadas em cada campo separado com a amostra abaixo como dados.

0x,9.4,,,#0,#UNIX#unix,#cli#L#فا#0#فا#0#L#SE#Cli#SE,#فارسی#فارسی#۱#1#١#1,bsh,#V & v

resultado esperado (exclua todos os duplicados, sem distinção entre maiúsculas e minúsculas, diferença em Unicode "persa #۱/árabe #١", ordem das entradas e qual entrada (ignorar maiúsculas e minúsculas) deve manter não importa aqui):

0x,9.4,,,#0,#unix,#cli#L#فا#0#SE,#فارسی#١#۱#1,bsh,#V & v

O padrão está neste formato #x, xsignifica qualquer coisa em um ou mais comprimentos de caracteres.

Tabela Unicode para diferenças de alfabeto/números dos idiomas persa/árabe

awk text-processing
  • 3 3 respostas
  • 647 Views

3 respostas

  • Voted
  1. Best Answer
    Gilles Quenot
    2018-03-20T11:03:00+08:002018-03-20T11:03:00+08:00

    Usando uma linha de comando perl em um shell (apenas algumas linhas) com um analisador csv adequado:

    perl -CS -Mopen=":std,IN,OUT,IO,:encoding(utf8)" -MText::CSV -lne '
        BEGIN{
            our $csv = Text::CSV->new({ sep_char => "," });
            sub uniq { my %seen;  grep !$seen{lc $_}++, @_; }
        };
        $csv->parse($_) or die "parse error";
        print join ",", map { join "#", uniq split /#/ } $csv->fields();
    ' file.csv
    

    Resultado :

    0x,9.4,,,#0,#UNIX,#cli#L#فا#0#SE,#فارسی#۱#1#١,bsh,#V & v
    

    Observação :

    • requer a instalação do Text::CSVmódulo perl: sudo apt-get install libtext-csv-perlpara debian e derivados
    • 1
  2. RomanPerekhrest
    2018-03-20T12:03:19+08:002018-03-20T12:03:19+08:00

    Solução completa Python:

    uniq_arabic_csv.pyroteiro:

    #!/bin/python
    
    import sys, re
    
    csv_data = sys.stdin.read().strip()
    result = []
    
    for item in csv_data.split(','):
        matches = list(re.finditer(r'#[^#]+', item, re.U | re.I))
        if not matches or len(matches) == 1:
            result.append(item)
        else:
            s, res = set(), []
            for m in matches:
                m = m.group()
                if m.lower() not in s: res.append(m)
                s.add(m.lower())
            result.append(''.join(res))
    
    result = ','.join(result)                    
    print(result)
    

    Uso:

    s="0x,9.4,,,#0,#UNIX#unix,#cli#L#فا#0#فا#0#L#SE#Cli#SE,#فارسی#فارسی#۱#1#۱#1,bsh,#V & v"
    python uniq_arabic_csv.py <<<"$s"
    

    A saída:

    0x,9.4,,,#0,#UNIX,#cli#L#فا#0#SE,#فارسی#۱#1,bsh,#V & v
    
    • 1
  3. αғsнιη
    2018-03-20T14:04:05+08:002018-03-20T14:04:05+08:00

    Eu codifico abaixo da solução simples awktambém:

    awk -F, '{ i=0; comma=""; while (++i<=NF) {
        if ( split(tolower($i), arr, /#/)>1 ){ for(v in arr) !unq[arr[v]]++;printf comma;
            for (x in unq) {printf (x!="")?hash""x:""; hash="#"; delete unq[x]}}
        else {printf comma""$i; comma=","}}; print ""
    }' infile.csv
    
    • 0

relate perguntas

  • Reorganize as letras e compare duas palavras

  • Subtraindo a mesma coluna entre duas linhas no awk

  • Embaralhamento de arquivo de várias linhas

  • como posso alterar o caso do caractere (de baixo para cima e vice-versa)? ao mesmo tempo [duplicado]

Sidebar

Stats

  • Perguntas 205573
  • respostas 270741
  • best respostas 135370
  • utilizador 68524
  • Highest score
  • respostas
  • Marko Smith

    Como exportar uma chave privada GPG e uma chave pública para um arquivo

    • 4 respostas
  • Marko Smith

    ssh Não é possível negociar: "nenhuma cifra correspondente encontrada", está rejeitando o cbc

    • 4 respostas
  • Marko Smith

    Como podemos executar um comando armazenado em uma variável?

    • 5 respostas
  • Marko Smith

    Como configurar o systemd-resolved e o systemd-networkd para usar o servidor DNS local para resolver domínios locais e o servidor DNS remoto para domínios remotos?

    • 3 respostas
  • Marko Smith

    Como descarregar o módulo do kernel 'nvidia-drm'?

    • 13 respostas
  • Marko Smith

    apt-get update error no Kali Linux após a atualização do dist [duplicado]

    • 2 respostas
  • Marko Smith

    Como ver as últimas linhas x do log de serviço systemctl

    • 5 respostas
  • Marko Smith

    Nano - pule para o final do arquivo

    • 8 respostas
  • Marko Smith

    erro grub: você precisa carregar o kernel primeiro

    • 4 respostas
  • Marko Smith

    Como baixar o pacote não instalá-lo com o comando apt-get?

    • 7 respostas
  • Martin Hope
    rocky Como exportar uma chave privada GPG e uma chave pública para um arquivo 2018-11-16 05:36:15 +0800 CST
  • Martin Hope
    Wong Jia Hau ssh-add retorna com: "Erro ao conectar ao agente: nenhum arquivo ou diretório" 2018-08-24 23:28:13 +0800 CST
  • Martin Hope
    Evan Carroll status systemctl mostra: "Estado: degradado" 2018-06-03 18:48:17 +0800 CST
  • Martin Hope
    Tim Como podemos executar um comando armazenado em uma variável? 2018-05-21 04:46:29 +0800 CST
  • Martin Hope
    Ankur S Por que /dev/null é um arquivo? Por que sua função não é implementada como um programa simples? 2018-04-17 07:28:04 +0800 CST
  • Martin Hope
    user3191334 Como ver as últimas linhas x do log de serviço systemctl 2018-02-07 00:14:16 +0800 CST
  • Martin Hope
    Marko Pacak Nano - pule para o final do arquivo 2018-02-01 01:53:03 +0800 CST
  • Martin Hope
    Kidburla Por que verdadeiro e falso são tão grandes? 2018-01-26 12:14:47 +0800 CST
  • Martin Hope
    Christos Baziotis Substitua a string em um arquivo de texto enorme (70 GB), uma linha 2017-12-30 06:58:33 +0800 CST
  • Martin Hope
    Bagas Sanjaya Por que o Linux usa LF como caractere de nova linha? 2017-12-20 05:48:21 +0800 CST

Hot tag

linux bash debian shell-script text-processing ubuntu centos shell awk ssh

Explore

  • Início
  • Perguntas
    • Recentes
    • Highest score
  • tag
  • help

Footer

AskOverflow.Dev

About Us

  • About Us
  • Contact Us

Legal Stuff

  • Privacy Policy

Language

  • Pt
  • Server
  • Unix

© 2023 AskOverflow.DEV All Rights Reserve