Foro - Perl en Español

my $executeCommand = $acommands{$tmpCommand};
$SIG{'KILL'} = sub { $processCommand->exit(); };
my $processCommand = threads->new(\&$executeCommand,$tmpCommand,"Valor2");
$processCommand->join();
$processCommand->kill('KILL');


Hola. Me gustaría saber la correcta implementación de threads en Perl, para evitar sobrecarga del programa, ya que si le envío, por ejemplo, 10 peticiones en segundo, me da respuestas ralentizadas.

P.D.: estoy construyendo un programa para gestión de servidores IRC donde podría recibir muchas más simultáneamente, y sería engorroso que el programa se 'pille' ...

Hola. Uno de los requisitos de la aplicación que estoy desarrollando es que al dar clic a una imagen, abra una nueva ventana, pero no la abre, como esperaría. El código es el siguiente:

#! /usr/bin/perl -w
use CGI qw(:standard);
use CGI::Carp qw/fatalsToBrowser/;
use DBI;
use strict;
use URI::Escape;
use Switch;
use utf8;
my $JSCRIPT=<<EOF;

function ventana_anexos(pagina){
alert ("HOOOOLLLLAAA");
return;
var opciones="toolbar=no, location=no, directories=no, status=no, menubar=no,scrollbars=no, resizable=no, width=408, height=120, top=85, left=140";
window.open(pagina,"",opciones);
}
my $cgi ...

Pod::Cpandoc: un perldoc para módulos que no tienes instalado.

cpandoc es un script Perl que actúa como perldoc, salvo que en vez de devolver No documentation found for "Uninstalled::Module" (No se encontró documentación para el módulo...), buscará en CPAN por la documentación de ese módulo.

Una característica importante de cpandoc es que solo accede al índice en la web si no tienes el módulo instalado. Así, si usas cpandoc en un módulo que ya tengas ...

Un buen día.

Estoy tratando de filtrar los genes de un cromosoma que se encuentran dentro del genoma en un archivo FASTA.

Me podrían dar luces de cómo iniciar el proceso.

Hola.

Tengo un fichero CSV: data.csv, y quiero convertirlo a un data.xls.

¿Qué me recomiendas? He visto por Internet estas dos librerías: Spreadsheet::WriteExcel, Text::CSV_XS.

Saludos

Estimados: buenas.

Necesito su ayuda, por favor.

Tengo Windows 7, 64 bit. Instalé ActiveState para 32 bit.

Estoy intentando instalar 2 módulos: win32-serialport y device-modem.

Mis repositorios son:
C:\Perl\bin>ppm repo
┌────┬───────┬────────────────────────────────┐
│ id │ pkgs │ name │
├────┼───────┼────────────────────────────────┤
│ 1 │ 17869 │ ActiveState Package Repository │
│ 2 │ 1 │ alma │
│ 3 │ 602 │ bribes │
│ 4 │ 0 │ gtk2 │
│ 5 │ 0 │ brock ...

Saludos. Por favor, si alguien puede ayudarme con el módulo Net::Bluetooth

Instalación: tengo Windows 7, 64 bit, con el ActiveState Perl.

He probado lo siguiente:

cpan install Net::Bluetooth

Al final me da un error: c:\perl\site\bin\dmake.exe --NOT OK

ppm install Net-Bluetooth

Según investigando es para Windows Server 2003.

¿Qué módulo puedo utilizar para administrar un módulo Bluetooth? Crear servicios, detectar dispositivos, etc.

Saludos.

Hola,

necesito descargar el html entero de una lista de twitter. He probado de hacerlo con wget de la siguiente manera pero me descarga de forma incompleta el html porque el desplazamiento va desplegando toda la lista a medida que uno desciende.

Con bash utilizo
wget -c -N -p -O usa.dat https://twitter.com/IABM1995/lists/usa/members
Guarda solo un parte del listado del html de twitter en usa.dat.

¿Es posible descargar todo ...

¡ Hola a Todos ! :)

Recién empiezo a ver la función fork y me surge una gran duda: ¿Por qué fork() se le pasa a una variable escalar?

Es decir, en el siguiente conjunto de instrucciones:

$pid = fork;

if ($pid){
# instructions goes here
....
}else{
# more instructions here
....
}
No logro entender el porqué de la primera línea y tampoco logro ...

Estimados, saludos.

Tengo la siguiente consulta: ¿hay alguna forma de realizar una conexión a un puerto COM?

COM1, COM2... COMx

Enviar y recibir datos.

¿¿¿ comando AT ???