Resultados da pesquisa a pedido "perl"
Existem ferramentas para encontrar vazamentos de memória no meu programa Perl?
Estou usando o ActiveState Perl 5.6 em um Windows 2003 Server e estou tendo alguns problemas de vazamento de memória. Existem boas ferramentas (ou mesmo ferramentas ruins que poderiam dar uma pista) que eu poderia usar para ajudar a encontrá-las.
Quando a diferença entre uma string e um número importa no Perl 5?
Se uma string no Perl 5 passalooks_like_number [http://perldoc.perl.org/Scalar/Util.html#looks_like_number-EXPR], pode muito bem ser um número. Por exemplo, my $s = "10" + 5;resulta em$s sendo designado15. Existem casos em que uma string não se ...
Como posso usar o CPAN como um usuário não root?
Quero instalar módulos perl em um servidor compartilhado no qual não tenho acesso root. Como posso fazer isso? Eles também parecem ter uma versão mais antiga do CPAN (queixa-se disso ao executar o comando), é possível atualizar o comando CPAN ...
Existe uma maneira de fazer com que esse código perl capture stderr e stdout de um tcsh?
open UNIT_TESTER, qq(tcsh -c "gpath $dir/$tsttgt; bin/rununittests"|); while(<UNIT_TESTER>){ reportError($ignore{testabort},$tsttgt,"test problem detected for $tsttgt:$_ ") if /core dumped/; reportError($ignore{testabort},$tsttgt,"test problem ...
Como posso permitir opções indefinidas ao analisar args com Getopt
Se eu tiver uma linha de comando como: my_script.pl -foo -WHATEVERMeu script sabe sobre--fooe quero que o Getopt defina a variável$opt_foo, mas eu não sei nada sobre-WHATEVER. Como posso dizer ao Getopt para analisar as opções sobre as quais eu ...
Função para extrair interseções de linhas de cruzamento nos eixos
O código no Perl é 5.18.2. sub extract_crossing { my @x = @{ $_[0] }; my @y = @{ $_[1] }; my @xcross =(); my @ycross =(); for (my $i=0; $i<$#x; $i++) { my $k = ($y[$i] - $y[$i+1]) / ($x[$i] - $x[$i+1]); if($y[$i+1] * $y[$i] < 0) { my $xc = ...
No Perl, mapeamento entre um arquivo de referência e uma série de arquivos
Eu gostaria de mapear dois conjuntos de dados em Perl. Eu tenho um conjunto de dados (ref 1) que é imutável, os outros dados devem ser extraídos de uma série de arquivos (1-20) para corresponder a ref1. Ref1 ID1 ID2 1 HZ 1 HX 1 HY 2 C 2 HZ 2 N ...
excluir pastas com mais de 12 horas em perl
Preciso excluir pastas com mais de 12 horas. Aqui está o meu código, não completo, é claro. Não sei como ver a "idade" de cada pasta em perl. #!/usr/bin/perl -w use v5.10.0; use File::Copy; use POSIX 'strftime'; use File::Temp; my $lapso = 12; ...
Qual é a maneira mais eficiente de verificar se há duplicatas em uma matriz de dados usando o Perl?
Preciso ver se há duplicatas em uma matriz de strings. Qual é a maneira mais eficiente de fazer isso?
Execução Perl da pergunta da linha de comando
Substituí o ActivePerl pelo Strawberry Perl no meu WinXP na semana passada. Eu descobri que devo executar meu script Perl com o comando deperl myperl.pl; caso contrário, eu só preciso corrermyperl.pl antes de instalar o morango. Como posso ...