Resultados da pesquisa a pedido "perl"
icas para manter baixo o uso de memória Pe
Quais são algumas boas dicas para manter baixo o uso de memória em um script Perl? Estou interessado em aprender como manter minha área de memória o mais baixa possível para sistemas, dependendo dos programas Perl. Sei que o Perl não é ótimo no ...
automaticamente obter índice de loop no loop foreach em perl
Se eu tiver a seguinte matriz em Perl: @x = qw(a b c);e eu itero sobre ele comforeach, então$_ fará referência ao @ atuelement na matriz: foreach (@x) { print; } imprimirá: abc Existe uma maneira semelhante de obter oíndic do elemento atual, ...
Verificar a existência da chave de hash cria a chave
Dado o seguinte código #!/usr/bin/perl use Data::Dumper; my %hash; my @colos = qw(ac4 ch1 ir2 ird kr3); foreach my $colo (@colos) { if(exists $hash{output}{$colo}) { print "$colo is in the hash\n"; } } print Dumper(\%hash); Eu tenho um hash ...
Por que meu script Perl falha em "~ /", mas funciona com "$ ENV {HOME}"?
Eu tenho usado esse script para sempre e sempre usei "~ /" para expandir meu diretório pessoal. Entro no trabalho hoje e ele parou de funcionar: #if ( $output eq "" ) { $output = "~/tmp/find_$strings[0].rslt" } # BROKEN if ( $output eq "" ) { ...
Por que minha comparação de valores está retornando false quando os valores são os mesmo
Eu tenho um script perl que carrega dados de um arquivo Excel XLS em um banco de dados. Primeiro, ele verifica se a data e hora do valor do arquivo já existem no banco de dados. Se isso acontecer, ele verifica se o valor do arquivo é igual ao ...
Como implementar um histórico de comandos em um cliente telnet? (setas para cima / para baixo)
Tenho um servidor que aceita conexões telnet para gerenciamento. Sinto falta do histórico de comandos, então quero fazer com que minha sessão de telnet o suporte. Minhas perguntas 1) Preciso implementar isso no lado do servidor, para que o ...
Como posso acessar seletivamente elementos retornados por uma sub-rotina Per
Diga uma sub-rotina Perl retorna uma matriz: sub arrayoutput { ...some code... return @somearray; }Quero acessar apenas um elemento específico da matriz, digamos o primeiro. Então eu poderia fazer: @temparray=arrayoutput(argument);e depois ...
Como codificar caracteres cirílicos para URL e decodificá-los?
Tenho um formulário em uma página: <form method="POST" accept-charset="UTF-8" action="index.cgi" name="TestForm">Um dos campos de entrada "search_string" pode ser usado para enviar caracteres cirílicos e, se isso acontecer, a string da URL será ...
Como posso extrair uma substring até o primeiro dígito?
Como posso encontrar a primeira subcadeia até encontrar o primeiro dígit Exemplo my $string = 'AAAA_BBBB_12_13_14' ;Resultado esperado: 'AAAA_BBBB _'
Como os atributos do método Perl funciona
Um recurso Perl interno pouco conhecido é o atributo. No entanto, o funcionário documentaçã [http://perldoc.perl.org/attributes.html] está fazendo um trabalho bastante ruim ao introduzir iniciantes no conceito. Ao mesmo tempo, estruturas como o ...