Resultados da pesquisa a pedido "perl"
Existe um marcador de sintaxe Perl (saída para HTML) como o GeSHi do PHP?
A maioria dos desenvolvedores de PHP provavelmente conhece o Syntax Highlighter chamado "GeSHi [http://qbnz.com/highlighter/]", que pega o código, destaca-o, com o uso de HTML e CSS: include('geshi.php'); $source = 'echo "hello, world!"; ...
Maneira rápida de encontrar a diferença entre duas seqüências de comprimento igual em Perl
Dados pares de cordas como este. my $s1 = "ACTGGA"; my $s2 = "AGTG-A"; # Note the string can be longer than this. Gostaria de encontrar posição e caráter em$s1 onde difere com$s2. Nesse caso, a resposta seria: #String Position 0-based # First ...
loop for em perl
my @array=(1..10); for my $i (@array){$i++;} print "array is now:@array";isso está alterando os valores da matriz. Por quê?
Como combinar seqüências de caracteres entre aspas duplas e caracteres de aspas duplas com escape?
Eu preciso de uma expressão regular Perl para corresponder a uma seqüência de caracteres. Estou assumindo apenas seqüências de caracteres entre aspas duplas, que a \ "é um caractere de citação literal e NÃO o fim da string, e que a \ é ...
Desmistificando o globo Perl (*)
Noessa questão [https://stackoverflow.com/q/4833919/468327]o pôster perguntou como fazer o seguinte em uma linha: sub my_sub { my $ref_array = shift; my @array = @$ref_array; }que com o meu conhecimento da magia Perl básica eu evitaria ...
Como liberar um arquivo no Perl?
Eu tenho o script Perl que acrescenta uma nova linha ao arquivo existente a cada 3 segundos. Além disso, há um aplicativo C ++ que lê esse arquivo. O problema é que o aplicativo começa a ler o arquivo após a conclusão do script e a manipulação ...
Devo manter um arquivo aberto ou devo abrir e fechar com frequência?
É habitual nesse caso abrir o arquivo apenas uma vez? #!/usr/bin/env perl use warnings; use 5.012; use autodie; my $file = 'my_file'; open my $fh, '>>', $file; say $fh "Begin"; close $fh; $SIG{INT} = sub { open my $fh, '>>', $file; say $fh ...
Esticar, redimensionar ou miniatura de uma imagem usando Perl
Como esticar ou redimensionar uma imagem (de qualquer formato) usando um script Perl?
Como posso usar __DATA__ duas vezes?
Como posso usar__DATA__ duas vezes? #!/usr/local/bin/perl use warnings; use 5.012; while ( <DATA> ) { print; } while ( <DATA> ) { chomp if $. == 1; print scalar reverse; print "\n" if eof; } __DATA__ one two three four five six
Como posso obter a diferença de dois carimbos de data / hora usando o Perl?
Aqui, com base em um problema, tenho dois carimbos de data / hora com o mesmo formato (terça-feira, 14 de dezembro, 18:23:19 2010 e terça-feira, 14 de dezembro, 17:23:19 2010). como posso obter a diferença de dois carimbos de hora em horas. por ...