Perguntas sobre 'perl'

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/
2
respostas

perl one liners + palavra de correspondência e excluir string após o separador

Eu trabalho com máquinas linux / solaris e eu preciso adicionar alguma regra no meu script ksh: Por favor, informe como combinar a palavra senha no arquivo, e exclua o valor da senha após o separador "=" com o comando perl liner segundo, a...
04.02.2014 / 15:23
1
resposta

Leitura e análise de entrada XML via TCP [closed]

Estou configurando algo em que precisarei configurar um serviço que aceite entrada em uma porta TCP e, em seguida, analise o XML fornecido e extraia os dados necessários e, em seguida, publique isso na análise universal do Google via HTTP GET ....
09.07.2013 / 23:07
3
respostas

Grep end regex matching

No OS X, system_profiler SPHardwareDataType outputs: Hardware Overview: Model Name: MacBook Pro Total Number of Cores: 4 L2 Cache (per Core): 256 KB L3 Cache: 8 MB Memory: 8 GB Eu quero obter o valor de Memory , cortado de...
29.03.2013 / 20:34
1
resposta

lê linha por linha e pega uma string na linha e atribui essa string à linha subsequente usando perl [duplicate]

O arquivo de dados é um arquivo de tamanho fixo, e eu quero ler o arquivo linha por linha e pegar uma string da linha atual, e depois anexar essa string à linha subseqüente e escrever em outro arquivo. Por exemplo1, dado o arquivo: AAABB...
08.04.2013 / 14:07
1
resposta

Renomeia arquivos e diretórios com caracteres especiais em máquinas solaris

O alvo do seguinte código (comandos) é renomear arquivos / diretórios e também suportar arquivos / diretórios com caracteres especiais como "@" ou "." etc esses comandos são executados no Linux sem problemas, export NAME_THAT_WE_WANT_TO_C...
11.03.2013 / 14:31
2
respostas

perl um forro + print VALUE no final da linha

O seguinte perl one liner verifica se $CURRENT_VERSION corresponde exatamente a $NEW_VERSION , e imprime se o fizer. Exemplo: CURRENT_VERSION=223.3.12.4.5.3 NEW_VERSION=223.3.12.4.5.3 DATE=17.3.2013 echo $CURRENT_VERSION | \...
17.03.2013 / 13:19
2
respostas

Diferença na manipulação regular de expressões entre Perl, Kikki e Kodos

#!/usr/bin/perl $mystring = "[2004/04/13] The date of this article."; if($mystring =~ m/(\d+)/) { print "The first number is $1."; } Perl retorna 2004 , mas Kiki e Kodos retornam /04/ . Por que isso?     
12.05.2012 / 22:49
1
resposta

O script do email_in.pl do Bugzilla levará 111 horas para ser concluído - como posso mudar isso?

Eu tenho um antigo sistema de acompanhamento de bugs, com cerca de 20k bugs. Nós instalamos um novo sistema bugzilla, e parte da iniciação será importar todos os erros do sistema antigo para o novo. Eu posso usar o processo email_in.pl para l...
01.08.2012 / 15:44
2
respostas

Perl - valor mínimo e máximo [fechado]

arquivo de entrada Xm_ABL1 Geneious extracted region 1 168 . + . Name=Extracted region from gi|371443098|gb|JH556762.1|;Extracted interval="3512970000000 -> 3514640000000" Xm_ABL1 Geneious extracted region 169 334 . +...
19.07.2012 / 21:09
1
resposta

Atribua manualmente um valor quando inet_ntoa retorna um endereço ip

Código: foreach $hostname (@hostnameUniqueSorted){ $ipaddr = inet_ntoa((gethostbyname($hostname))[4]); if(chomp($ipaddr) =~ '^$') $ipaddr == "ip not avail"; <-- doesn't work } Se o host não retornar um endereço IP, ele quebra...
04.01.2012 / 10:30