Resultados da pesquisa a pedido "perl"
Como capturar várias correspondências do mesmo regex Perl?
Estou tentando analisar uma única string e obter vários pedaços de dados da mesma string com as mesmas condições regex. Estou analisando um único documento HTML estático (por um motivo não revelado, não posso usar um analisador de HTML para fazer ...
Como decodificar dados UTF-16 no Perl quando não sei a ordem dos bytes?
Se eu abrir um arquivo (e especificar uma codificação diretamente): open(my $file,"<:encoding(UTF-16)","some.file") || die "error $!\n"; while(<$file>) { print "$_\n"; } close($file);Eu posso ler bem o conteúdo do arquivo. No entanto, se eu ...
Qual é a maneira mais fácil de obter uma chave com o valor mais alto de um hash no Perl?
Qual é a maneira mais fácil de obter uma chave com o valor mais alto de um hash no Perl?
Como posso saber se um conjunto de parênteses no código Perl atuará como parênteses de agrupamento ou formará uma lista?
No perl, os parênteses são usados para substituir a precedência (como na maioria das linguagens de programação) e para criar listas. Como posso saber se um par específico de parênteses será tratado como uma construção de agrupamento ou uma lista ...
Como posso obter o separador de diretório (caminho do arquivo) no Perl?
No caso de Java, podemos obter o separador de caminho usando System.getProperty("path.separator");Existe uma maneira semelhante no Perl? Tudo o que quero fazer é encontrar um subdiretório dir, imediato. Digamos que estou recebendo dois ...
Montando XML em Perl
Estou precisando fazer chamadas de API para um arquivador da NetApp. Eu sei que XML bruto eu preciso enviar: <? xml version="1.0" encoding="utf-8" ?> <!DOCTYPE netapp SYSTEM "file:/etc/netapp_filer.dtd"> <netapp version="1.7" ...
Extrair linhas quando a coluna K estiver vazia com AWK / Perl
Eu tenho dados parecidos com este: foo 78 xxx bar yyy qux 99 zzz xuq xyzEles são delimitados por tabulação. Como posso extrair linhas onde a coluna 2 está vazia, produzindo bar yyy xuq xyzEu tentei isso, mas parece não funcionar: awk '$2==""' ...
Usando o modificador ee com segurança com o operador s /// quando o lado direito é inserido pelo usuário
Estou escrevendo um script Perl em que o usuário pode inserir uma regex e uma string de substituição. O script pesquisará um conjunto de arquivos e aplicará as alterações de acordo com o perls/// operador aplicado com a entrada do usuário. Para ...
Como interajo com um objeto Perl que possui um atributo hash?
Eu tenho uma classe com várias variáveis, uma das quais é um hash (_runs): sub new { my ($class, $name) = @_; my $self = { _name => $name, ... _runs => (), _times => [], ... }; bless ($self, $class); return $self; }Agora, tudo o que estou ...
Por que o DBI do Perl se queixa de "falha: ERROR OCIEnvNlsCreate" quando tento conectar-me ao Oracle 11g?
Estou recebendo o seguinte erro ao conectar-se a um banco de dados Oracle 11g usando um script Perl simples: failed: ERROR OCIEnvNlsCreate. Check ORACLE_HOME (Linux) env var or PATH (Windows) and or NLS settings, permissions, etc. atO script é o ...