Foro - Perl en Español

Hola, buenas noches.

Por favor, si pueden ayudarme, necesito extraer texto entre las marcas HTML de este ejemplo:

<span class="field-content"><p><strong class="uppercase">CABRERA CONSIGNACIONES VENDE: lancha</strong> de 5 y 6 mts, de aluminio, marca LeveFord, con póliza, factura y chata incluida, nueva, entrega inmediata. Ref. 70204254 Av. Viedma # 206, primer anillo entre Ñuflo de Chaves y Warnes (C163636430)</p>
</span> </div>
<span class="field-content"><p><strong class="uppercase">IMPORTADORA MENDOZA OFRECE: Micros</strong> Toyota Jumbo 2016 O km, gasolina, con garantía ...

Hola, amigos, estoy intentando sumar múltiples valores de múltiples hashes con la misma clave.

Este es el resultado que me gustaría obtener:

HASH1 => { '2016-07-01' => { 'val1' => '7', 'val2' => '9', }, '2016-07-02' => { 'val1' => '10', 'val2' => '2', } }
HASH2 => { '2016-07-01' => { 'val1' => '8', 'val2' => '4', }, '2016-07-03' => { 'val1' => '3', 'val2' => '2', } }
HASH3 => { '2016-07-01' ...

Hola, ¿en las entrevistas de trabajo para programador les piden programar en ese momento o algo de ese tipo?

Hola a todos de nuevo, estoy tratando de crear un %hash con algunas frases que necesito cambiar.

Las palabras se encuentran dentro de un array y usando map, agrego un mismo texto a todas las palabras contenidas y luego armo el %hash. El código es el siguiente:
#!/usr/bin/env perl
use v5.22;
use Data::Dumper;

### @array con las palabras de entorno
my @ext_env = qw (
postscript tikzpicture pgfpicture ganttchart circuitikz
forest tikzcd dependency pspicture ...

Tengo este error:

Undefined subroutine &MyApp::MyBase::Today called at ..//MyApp/MyBase.pm line 967.

pero en mi código ya tengo cargado el módulo Date::Calc:

use Date::Calc qw(:all);

y quiero llamar una función un método de Date::Calc y no sé por qué me sale ese error. En un servidor me funciona bien, pero lo he pasado a otro, y ya me instalaron el módulo y no funciona, sigue el mismo error.

Hola, grupo. Solicito de su ayuda para resolver un problema. Espero explicar bien el problema para que puedan ayudar a la solución.

Resulta que tengo la siguiente lista de genes abreviados:
ACY1
RNA5S1
USP12-AS1
TRAJ23
ZFAT
Y deseo buscar cada uno en el siguiente archivo de nombres:
Approved Symbol Approved Name
A2MP1 alpha-2-macroglobulin pseudogene 1
ACY1 aminoacylase 1
SLIT2 slit guidance ligand 2
RN7SL843P RNA, 7SL, cytoplasmic 843, pseudogene
SP9YP24 ubiquitin specific peptidase 9, Y-linked ...

Hola.

Ya están empezando a subir los vídeos de la YAPC::NA 2016 (a partir de ahora, The Perl Conference) en su canal de Youtube, que se están celebrando estos días en Orlando, EE.UU.

A destacar, la divertida presentación de Perl 6 para principiantes que se ha currado Damian Conway.

¿ A partir de qué versión de Ubuntu viene con Python 2.7.5 por defecto ? Yo uso la versión Ubuntu 10.04 y viene con la versión de Python 2.6.5 :evil: :evil:

Buenas a todos.

Yo, aquí con mis problemas nuevamente, jeje. Resulta que quiero instalar la librería XML::Quote para usarla en un script de un servicio web que hice, pero no sé cómo instalarla en el Perl de XAMPP.

Intento ejecutar el ppm de XAMPP pero me da el siguiente error: "This application has failed to start because libexpat-1_.dll was not found. Re-installing the application may fix this problem".

En el equipo también tiene instalado ActivePerl. ...

Hola, tengo el siguiente código:
my $code = "";

open(FILE, 'raro.html');
while (my $line = <FILE>) {
$code .= $line;
}
close (FILE);

chomp $code;

while ($code =~ /(?<="r"><. href=")(.+?)"/mig ) {
my $link = $1;
print $link."\n";
}
else {
print "nop";
}

El tema es que si uso while() en vez if() me devuelve estos errores:
Can't use global @_ in "my" at line 45, near "= @_"
syntax error line 60, ...