Foro - Perl en Español

Hola gente, estoy haciendo una parte de un programa donde tengo que validar un archivo, que contendrá permisos de base de datos. La lógica de la validación consistirá en:

- Validar que haya una sola sentencia por cada línea y finalice con ";"
(no pueden haber dos sentencias de grants en una misma línea)

- Validar que solo contenga "Grant insert,update,delete,references,execute,select y all" y nada más (no puede haber ningún otro tipo de grant)

- ...

Hola. necesito de su ayuda... Ojalá alguien me pueda asesorar con esto...

Es un formato de secuencias de ADN... me busca la $variable y la $secuencia y abro otro archivo en el cual voy a buscar $variable con un grep() y si la encuentra, imprimir la $variable2 declarada en el if(), más o menos así:

open( my $fh, $ARGV ) or die "No se puede abrir el archivo\n";

my $var;
my $sec;

while (<$fh>) ...

Estoy utilizando la siguiente librería: Spreadsheet::WriteExcel para generar gráficos. ¿Cómo podría hacer para colocar la etiqueta de datos en el gráfico? Quisiera que indique qué valor tiene cada porción en el gráfico.

Tengo una hoja de Excel con 5 columnas y más de 2000 renglones y lo que quiero es leer la información de Excel e insertarla en una tabla de PostgreSQL. Al ejecutar el programa me señala que Can´t locate SpreadSheet::Read.pm in @INC at line 3, que tiene use Spreadsheet::Read;

El programa completo es (estoy trabajando en Windows Vista):
#!/usr/bin/perl

use Spreadsheet::Read;
use strict;

use ConectarDBs;

my ($dbhs,$sths);
my ($index,$llave,$fecha,$nombre,$paterno,$materno);

#-------------- Conexion ...

¡Saludos!

Me gustaría saber si hay alguna posibilidad de enviar un correo a un usuario, para que, por ejemplo, le llegue un enlace para modificación de contraseña, para la primera vez que inicia sesión en una página concreta, para el tema de seguridad.

¿Algún tutorial? ¿Ejemplo?

Gracias.

¿Cómo puedo hacer para unir 2 array para que me muestre los datos ordenados como se indica líneas abajo?

@fecha=('13/12/2010','14/12/2010','15/12/2010')
@monto=('150','360','50')
y obtener el siguiente resultado
14/12/2010->360
13/12/2010->150
15/12/2010->50

¡Hola!

Soy nueva en el foro y estos últimos días estoy dando vueltas por esta página para realizar, por así decirlo, una minishell.

Me ha ayudado mucho en varias cosas, pero ahora me he quedado atascada en una función.

Consiste en una función que debe mostrar por pantalla el nombre de los grupos secundarios y primarios al recibir el nombre de un grupo principal (GID).

# Ya hemos abierto los ficheros /etc/group y los ...

Hola, he estado probando las rutinas del tutorial de base de datos para manejo de texto y tengo las siguientes preguntas:

1. Se creó una librería llamada txtdb_lib.pl, la llamé de un programa con use txtdb_lib.pl, y me marcó error. Lo que hice fue incluir todo el código en mi programa principal, pero ¿cómo la llamo?

2. Para probar todas las rutinas generé el archivo base_datos.txt con el siguiente contenido:

id||nombre||no1||apellido||no5||email
1||esteban||1||quintana||2||[email protected]
2||uriel||3||lizama||4||[email protected]
3||hector||5||gutierrez||6||[email protected]
4||reynaldo||7||gutierrez||8||[email protected] ...

Hola,

Ya me han resuelto bastantes dudas en el apartado Web. Ahora tengo una duda de cómo ejecutar un programita que tengo en Perl desde el cron del sistema operativo.

Al cron le añado esto:

>crontab -l
# DO NOT EDIT THIS FILE - edit the master and reinstall.
# (/tmp/crontab.7150 installed on Mon May 2 16:51:04 2011)
# (Cron version -- $Id: crontab.c,v 2.13 1994/01/17 03:20:37 vixie Exp $)
52 * * * ...

Estimados amigos perleros, espero que anden bien.

Tengo el siguiente problema: tengo un archivo de texto de la siguiente estructura (solo que bastante más largo):

AA 12 23 0.693 1.200 0 13 0.005 0.096 2 2
AA 12 25 0.572 0.745 0 0 0.005 0.000 2 2
AB 12 309 0.740 0.045 0 3 0.005 0.333 2 2
AB 12 316 0.445 0.964 0 0 0.005 0.058 1 1
AB 12 317 0.687 0.445 0 ...