Perguntas sobre 'perl'

Tags
Perl é uma linguagem de programação de alto nível que vem instalada por padrão no Ubuntu. É bem conhecido por seu uso para manipulação de texto, scripts CGI e sua enorme comunidade. Você pode encontrar qualquer modul e muitos tutoriais em http://www.cpan.org/
1
resposta

Leitura aleatória do arquivo (perl)

Nesta seção do código, preciso ler file.txt aleatoriamente: ... open my $fh, '<', 'file.txt' or die $!; while ( <$fh> ) { next unless /\S/; chomp; my $response = $ua->get( "http://$_.domain.tld/" ); ... Como ler linhas de...
20.09.2018 / 07:49
1
resposta

Como usar o sed para substituir todo o resto por outra string, exceto o padrão?

Eu preciso usar o sed para substituir tudo antes de corresponder ao padrão com outra string em um arquivo Existem vários caminhos no meu arquivo. Os últimos componentes desses caminhos são os mesmos, independentemente do usuário, no entanto,...
28.08.2018 / 06:02
3
respostas

de acordo com a permissão da raiz para www-data

Eu tenho um script perl dhcpmanip.pl que contém esta linha: system "hostapd /etc/hostapd-1.0/hostapd/hostapd.conf"' É um comando para iniciar hostapd e eu recebo este erro: Insecure '$ENV{PATH}' while running setuid at '/var/www/...
28.06.2013 / 16:53
1
resposta

grep + pesquisa sintaxe complexa recursiva sob pasta em arquivos / scripts

Queremos pesquisar a seguinte linha recursiva na pasta / s awk '{print}'|grep -i -e 'port is up' -e 'valid output' então fizemos isso: grep -r "awk '{print}'|grep -i -e 'port is up' -e 'valid output'" /var grep -r "awk '{print}'|grep...
08.07.2018 / 20:31
2
respostas

Compare uma coluna de um arquivo com todas as colunas em outro arquivo

Eu tenho dois arquivos. O arquivo 1 tem um padrão na forma de uma única coluna que eu quero comparar com todas as colunas no arquivo 2 para, finalmente, contar quantas colunas no arquivo 2 mostram esse padrão. O número de colunas no arquivo 2 é...
02.07.2018 / 22:30
2
respostas

Imprimindo usuários sem diretórios / home e diretórios / home sem usuários

Eu preciso desenvolver um script perl que gere uma listagem formatada de qualquer usuário sem um diretório home e qualquer diretório home que não esteja conectado a um usuário. Por exemplo, se eu usasse o script abaixo para ler nos usuário...
14.05.2018 / 22:27
1
resposta

Regexp: regexp horrivelmente lento em perl - como otimizar?

Isto: echo BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BA BBBBBBBBBBBBBBBBBBBBBBBBBBBBA | perl -pe '/^(.*?B(?:A.*?B){30})A/' leva surpreendentes 8 segundos na minha máquina. Eu esperava que levasse no máximo algumas m...
23.04.2018 / 01:58
2
respostas

Excluir texto entre parênteses, mas nunca depois da linha vazia

Considere um arquivo de texto, com linhas de texto reunidas em vários blocos, em que cada bloco é separado por pelo menos uma linha vazia. Usando um one-liner do Bash, como excluo todo o texto de < para > ou \n\n ? Em outras pal...
07.04.2018 / 12:15
2
respostas

Padrão de Regex e Substituir linha por substituição

Para um processo de migração, eu preciso fazer alguma substituição no meu script bash. Então, nos meus arquivos .txt, eu tenho essas referências, por exemplo: [[File:My Image.png|400px|thumb|center|My Image]] [[File:My Image.png|400px|thum...
04.04.2018 / 12:10
1
resposta

Perl: Ajuda a substituir vírgulas entre aspas com o símbolo @

Oi eu tenho esse bloco de texto complicado, onde algumas citações finais aparecem na próxima linha. Quero substituir cada vírgula que aparece entre aspas com @ símbolo. "----, ----",, ----, ----,,"",start quote," starting next line with end...
04.04.2018 / 13:25