Foro - Perl en Español

Buenas noches,

He estado tratando de hacer un código en Perl que me permita tomar de una carpeta un número de archivos de texto y ponerlos en otra carpeta que se encuentra vacía. Para ésto tengo una lista de la carpeta 1 con todos los nombres de los archivos y tengo otra lista con solo los archivos que quiero pasar a la otra carpeta. El nombre de cada uno de los archivos está compuesto de ...

Desde hace unos días, ya está disponible la segunda edición del libro de trabajo para el estudiante ($4, 164 páginas), que sigue el plan de estudio del libro Learning Perl, 6ª edición.

Ya está disponible la cuarta edición del libro "Programming Perl", el legendario libro del dromedario.

1184 páginas con todo lo necesario para saber qué es Perl.

De momento, en inglés.

Buenos días,

Tengo un archivo de 1.2 TB y al intentar abrirlo desde un programa hecho en Perl me muestra el mensaje: your version of Perl does not support large files.

La configuración de mi PC es :

SO : CentOS 6.2 64 bits
Kernel : 2.6.32-220.el6.x86_64

Procesador : Core i7 3.4 GHz
Memoria : 16 GB

Version Perl : 5.10.1

Por favor, ¿cuál es la forma de habilitar archivos grandes?

Gracias,

Daniel López

Quiero comprobar la lectura del archivo "/etc/inetd.conf", para luego verificar su configuración, pero según el script no existe y esto es erróneo.

Lo verifiqué como usuario "root" y me dice exactamente lo mismo.

#!/usr/bin/perl
use Term::ANSIColor qw(:constants);
my $FICHERO4 = '/etc/inetd.conf';
my $estatus4 = stat($FICHERO4);

if ((! defined $estatus4) || (-r $FICHERO4)) {
print BOLD, RED, 'No existe', RESET, " El archivo $FICHERO4 no existe en el sistema o no puede ser accedido\n";

} ...

Estimados,
Estoy tratando de parsear la siguiente web, ya que me gustaría ver la información en consola y no por web, ya que ésta mete mucha publicidad.

El sitio es:
http://91.123.198.225/Personas/APELLIDO ... xxxx&Sex=M

Aquí obtenemos una tabla con información pero no sé cómo parsear el HTML.

Alguien me puede ayudar.

Muchas gracias.

Hola,

Tengo un servidor en Perl y un cliente de prueba en Perl.

Quiero enviar una cadena (string) sin enviarla línea por línea, respetando su formato original,
porque si lo envío como "print $socket $datos-ejemplo . "\n";", me llegan los datos por líneas.

Una duda, para enviar datos, ¿es necesario que la línea finalice con '\n'?
Porque sin '\n', parece ser que la línea no se envía.

Gracias a explorer por compartir el código de ...

«Muchos, donde yo me incluyo, somos casi adictos a las consolas, y no me refiero a las consolas de videojuegos ;) sino a las consolas de nuestro S.O. GNU/Linux, pues personalmente no me gusta muchos los entornos gráficos, ya que por otra parte también me optimiza mi máquina porque me consume menos recursos que una GUI.

Dicho esto, pues les presentaré un Reproductor de música en Perl ...

Hola a todos,

Estoy investigando cómo agregar nuevos Glyph para crear mis propios dibujos. He modificado los Glyph existentes pero no quisiera eliminar los dibujos predefinidos. Espero que alguien me pueda orientar para poder agregar nuevos Glyph.

Saludos
jsgarcia

¡¡¡Hola, qué tal, muy lindo día!!!

Tengo algo atorado este programa y necesito su ayuda. Lo que yo necesito es que a partir de unas tablas de entrada
como estas:
ENSMUSG00000000001 1488
ENSMUSG00000000028 203
ENSMUSG00000000049 3
ENSMUSG00000000056 192
ENSMUSG00000000058 199
ENSMUSG00000000078 912
ENSMUSG00000000085 150
quiero obtener una sola que contenga todos los genes (la primera columna) que correspondan a los archivos y a los que no se encuentren en uno u otro les pongo un ...