Foro - Perl en Español

Buenas, soy nuevo en esto de Perl y quisiera pedirles ayuda para que me aconsejen cómo podría hacer para llenar un array en Perl y después trasladar ese array a una base de datos pero sin contar los repetidos. El array lo quiero llenar con una lista de nombres que está en texto en forma vertical, ejemplo:

carlos
eduardo
maria
pepe
lucho
carlos
jose
lucia
maria
maria

Es algo así.

Agradecería que me pudieran dar ...

Ya está disponible la nueva versión de la distribución Rakudo Star: v2012.12

Recordemos que esta distribución reúne los siguientes componentes:

• la versión 2012.11 del compilador Rakudo Perl 6
• la versión 4.10.0 de la máquina virtual Parrot
• varios módulos, documentación, y otros recursos para Perl 6

Anuncio (en inglés)

Buenas tardes,

Antes de nada agradecer las aportaciones y explicaciones publicadas en el foro, ya que me han sido de gran utilidad.

Soy nuevo en Perl, llevo menos de una semana, y tengo las siguientes dudas (que ya he buscado y no consigo encontrar).

* ¿Hay alguna manera de mostrar un fichero de la línea n a la m (ejemplo: de la 10 a la 20)?


Posiblemente tendré mas dudas al respecto, pero prefiero seguir ...

Hola a todos, muchas felicidades.

Desde hace días tengo un problema con un script que tiene como función hacer un tail -f y filtrar una cadena específica, y ya lo he intentado de varias manera, y siempre me da el error
"Use of uninitialized value $_ in scalar chomp at script.pl line 17.
Use of uninitialized value $_ in pattern match (m//) at script.pl line 18."

En este caso lo hago con el archivo /var/log/syslog ...

Hola, amigos.

Estoy empezando en esto de Perl y parece que se me ocurrió hacer algo muy complicado... La cosa es la siguiente: tengo un archivo de texto que contiene una lista de palabras todas distintas (cerca de 15 000, con un formato del tipo FBxxxxxxxx) y que necesito encontrar y reemplazarlas (más bien agregarles un prefijo, para que queden prefix-FBxxxxxxxx) en un archivo que tiene cerca de 8 000 000 de líneas.

Había pensado ...

«Hola,
hoy quería compartir recetas en Perl para la comparación eficiente de secuencias de igual longitud. Las dos funciones que vamos a ver devuelven como resultado listas con las posiciones (contando desde 0) en las que difieren dos secuencias.

Para qué sirve esto? En general, para calcular distancias de edición (edit distances); en bioinformática es una manera, por ejemplo, de comparar oligos de igual longitud o secuencias extraídas de un alineamiento múltilple, incluyendo gaps. El ...

Buenos días, por favor, necesito que alguien me colabore con mi script SNMP::PERL. Vi ejemplos y demás. Hice de la misma manera y todo pero me sale error de que el equipo no responde, mi duda es cómo y dónde debo ingresar los valores (Read Community y Write Community) para hacer la consulta SNMP, por favor.

Ja, como regalo de navidad les dejo el script navideño xDDD.

El código


#!usr/bin/perl
#El script navideño
#Coded By Doddy H

while(true) {

my($dia,$mes,$anio,$hora,$minutos,$segundos) = agarrate_la_hora();

unless($dia eq "25" and $mes eq "12") {
syswrite STDOUT," Fecha y hora : $dia/$mes/$anio $hora:$minutos:$segundos \r";
} else {
syswrite STDOUT,"\n\n Feliz navidad !";
<stdin>;
exit(1);
}

}

sub agarrate_la_hora {

my ($a,$b,$c,$d,$e,$f,$g,$h,$i) = localtime(time);

$f+= 1900;
$e++;

return($d,$e,$f,$c,$b,$a);

}

#The End ?

Hola,

El asunto es un poco extenso pero no sabia como llamar al problema.

¡Os explico!

Tengo un script en Perl que ejecuta mediante el comando qx() un programa en Java.
Este programa en stdout la solución.

Bien, pues este script ejecutado por terminal, funciona correctamente (muestra los datos bien).
Ejecutado como www-data en el terminal también funciona bien, pero desde el browser, las letras con tilde las transforma a '??'.

Os pongo parte del ...

¡Hola a todos!

Hace poco comencé en el mundo de Perl con Ubuntu. He realizado un script y me encuentro con la inquietud de saber si es posible convertirlo en un archivo binario.

Saludos,


Ricardo