Resultados da pesquisa a pedido "perl"
Leia um arquivo em uma matriz usando Perl
Estou lendo um arquivo e armazenando os dados em uma matriz chamada@lines. Em seguida, percorro esse array usando umfor loop e dentro do loop eu combino em certos valores: $find = "fever"; if ($_ =~ /$find/) { print "$_\n"; $number++; #@lines = ...
O PHP tem autovivificação?
Procurando PHP.net [http://uk3.php.net/manual-lookup.php?pattern=autovivification] para autovivificação não dá resultados. No momento da escrita, Wikipedia [http://en.wikipedia.org/wiki/Autovivification] afirma que apenas o Perl o possui. Não há ...
Como validar o número em perl?
Eu sei que existe uma biblioteca que faz isso use Scalar :: Util qw (número_com_ aparência); yet Quero fazê-lo usando expressão regular perl. E quero que funcione para números duplos, não apenas para números inteiro então eu quero algo ...
IE9 perde solicitações para um servidor Catalyst local
Ok, isso é difícil. Eu tenho um servidor Catalyst que posso acessar muito bem no Firefox 4, Chromium 12 e IE 8 e 9 em outros computadores. Quando tento acessá-lo do IE9 em minha própria máquina (a mesma máquina em que o servidor está), recebo ...
elhor maneira de atribuir um valor padrão a uma variável (simule Perl ||, ||
Eu amo fazer esse tipo de coisa no Perl:$foo = $bar || $baz atribuir$baz para$foo E se$bar está vazio ou indefinido. Você também tem$foo ||= $bletch, que atribuirá apenas$bletch para$foo E se$foo não está definido ou está vazi O operador ...
Powerhell / Perl: mesclando vários arquivos CSV em u
Tenho os seguintes arquivos CSV, quero mesclá-los em um único arquivo CSV 01.csv apples,48,12,7 pear,17,16,2 orange,22,6,1 02.csv apples,51,8,6 grape,87,42,12 pear,22,3,7 03.csv apples,11,12,13 grape,81,5,8 pear,11,5,6 04.csv apples,14,12,8 ...
Como você cria nomes de arquivos unicode no Windows usando o Perl
Eu tenho o seguinte códig use utf8; open($file, '>:encoding(UTF-8)', "さっちゃん.txt") or die $!; print $file "さっちゃん";Mas eu recebo o nome do arquivo como ã • ã £ ã¡ã‚ƒã ‚“. Txt Eu queria saber se havia uma maneira de fazer isso funcionar como eu ...
Por que os parênteses são opcionais somente após a sub declaração?
(Presumiruse strict; use warnings; ao longo desta pergunta.) Estou explorando o uso desub. sub bb { print @_; } bb 'a';This obras como esperado. O parêntese é opcional, como em muitas outras funções, comoprint, open etc. No entanto, isso ...
Perl programa para substituir abas por espaços
Gostaria de escrever uma linha única Perl que substitua todas as guias '\ t' em um lote de arquivos de texto no diretório atual por espaços, sem afetar o espaçamento visíve Alguém pode me mostrar como fazer isso?
Existe uma maneira de combinar qualquer caractere não alfabético Unicode?
Tenho alguns documentos que passaram pela conversão de OCR de PDF para HTML. Por causa disso, eles acabaram tendo muitas pontuações unicode aleatórias onde o conversor estragou (ou seja, elipses, etc ...). Eles também possuem corretamente um ...