Resultados da pesquisa a pedido "perl"
Criando nomes de arquivos com caracteres unicode
Estou procurando algumas diretrizes sobre como criar nomes de arquivos com caracteres Unicode. Considerar: use open qw( :std :utf8 ); use strict; use utf8; use warnings; use Data::Dump; use Encode qw(encode); my $utf8_file_name1 = ...
Chamada de função remota usando SOAP :: Lite
Estou tentando escrever um aplicativo cliente em Perl usando SOAP :: Lite. Estou tentando chamar uma função específica, mas não consigo obter os parâmetros corretos. Continuo recebendo uma resposta dizendo "Encontrei mais elementos no envelope de ...
O File :: Find :: Rule pode ser corrigido para lidar automaticamente com a codificação / decodificação de caracteres do nome do arquivo?
Suponha que eu tenha um arquivo com nomeæ (UNICODE: 0xE6, UTF8: 0xC3 0xA6) no diretório atual. Então, eu gostaria de usarFile::Find::Rule [https://metacpan.org/pod/File::Find::Rule]para localizá-lo: use feature qw(say); use open qw( :std :utf8 ...
Por que alguns programadores declaram variáveis como my $ myvariable = shift; em Perl?
Tenho acompanhado os tutoriais no perlmeme.org e alguns dos autores declaram variáveis da seguinte maneira: my $num_disks = shift || 9; # - no idea what the shift doese dentro de loops como my $source = shift; my $dest = shift; my $how_many = ...
Qual é a melhor maneira de escrever um aplicativo Perl CGI?
Todos os exemplos que eu já vi do CGI / Perl basicamente contêm várias instruções de impressão contendo HTML, e essa não parece a melhor maneira de escrever um aplicativo CGI. Existe uma maneira melhor de fazer isso? Obrigado. EDIT: Decidi usar ...
Indexando diretamente na matriz retornada no Perl
Esta pergunta foi feita sobre o PHP, tantoaqui [https://stackoverflow.com/questions/172559/most-efficient-way-to-index-a-returned-array] eaqui [https://stackoverflow.com/questions/2509937/directly-accessing-return-values-without-referencing] , e ...
Criar uma chave multidimensional de hash da matriz?
Eu quero criar uma multidimensional%hash de@array. Suponha@array é como my @array=(1,2,3,4,5);Eu quero atribuir@array último valor como valor final para multidimensional%hash isto é %hash=( 1=>{ 2=> { 3=> { 4=>5 } } } )Que ...
Moose é realmente tão lento?
Eu baixei recentemente o Moose. Experimentalmente, reescrevi um módulo existente no Moose. Parece ser uma maneira conveniente de evitar escrever muito código repetitivo. Fiz os testes do módulo e notei que estava um pouco atrasado. Eu criei o ...
Removendo CRLF (0D 0A) da cadeia de caracteres em Perl
Eu tenho um script Perl que consome um arquivo XML no Linux e, ocasionalmente, há CRLF (Hex 0D0A, novas linhas) em alguns dos valores de nó que. O sistema que produz o arquivo XML grava tudo como uma única linha e parece que ocasionalmente ...
Posso nomear uma matriz anônima no Perl?
#!/usr/bin/perl -w use strict; my $aref = [1, 2, 3]; my @a = @$aref; # this line $a[1] = 99; print "aref = @$aref\n"; print "a = @a\n";produz saída: aref = 1 2 3 a = 1 99 3A saída mostra que@a e@$aref não se refira à mesma matriz. A linha ...