Foro - Perl en Español

Buenas foreros,
Estoy haciendo una pequeña interfaz gráfica para consola con whiptail la pregunta es la siguiente: ¿cómo hago desde Perl para capturar el password que ingreso en whiptail --passwordbox?


Muchas gracias

Buenas.
Lo primero, presentarme. Soy Aitor, un estudiante de Informática que por una asignatura he comenzado a estudiar Perl.

Mis conocimientos son mínimos y las dudas aparecen rápidamente.

Tras mucho buscar y no encontrar lo que buscaba, he decidido probar suerte en este foro.

Veréis, tengo que conseguir hacer en Perl, una nube de etiquetas, con las etiquetas que se cogen de un fichero xhtml, concretamente, el de menéame:

http://meneame.net/rss2.php ...

Creo que es un problema de sintaxis pero me estoy volviendo loco, el asunto consiste en que por cada valor de un for quiero definir un string diferente, de esta forma:
for ($i=0;$i<=10;$i++) {
my $string.$i = $array;
}
Al que pueda llamar cuando quiera como:

print $string1 o 2 o 3....;

Imprimiendo en pantalla el valor $array.

Pero no lo consigo de ninguna forma.

Buenas, ante todo muchas gracias y cómo no, comento, por una duda que tengo. Veréis, tengo un programilla: que tiene que coger datos de un archivo que le introducimos como parámetro ($ARGV).

Pues bien, esos parámetros se separan por tabulaciones y lo que quiero es coger el primer valor como clave para un hash y los valores 4 y 5 (3 y 4 empezando de 0) como valores de esa clave. Y después mostrarlos ordenando ...

¡¡¡Hola a todos!!!

Necesito ayuda. Soy nueva en todo esto de Perl y redes... ¡¡¡pero tengo que hacer una interfaz web que maneje un router Cisco!!! la cual dé permiso o niege a las IP que mande vía web ¡¡y no tengo idea de cómo mismo comenzar hacer el script!! alguna idea... ¡¡¡agradecería mucho su opinión!!!

¿Hay alguna forma de hacer esto más rápido y "limpio"?

sub Crypt {
my ( $kk, $text ) = @_;
my $i = 0;
my @return;
for ( $i; $i <= length($text); $i++ ) {
my $a = unpack( 'C', substr $text, $i, 1 );
my $b = unpack( 'C', substr $kk, $i, 1 );
push @return, ( pack( 'C', $a ^ $b ) );
}
return @return;
}

Es un encriptador OTP (One-time pad) ...

Es una pregunta que me estoy haciendo debido a que un cliente tiene una base de datos en SQL y su página está en PHP y dicha base de datos no la consigo dentro del FTP.

Después de un tiempo en la que no pasaba casi nada y, más bien, era un nido de SPAM, un par de valientes se han metido a fondo con la enorme tarea de hacer limpieza, echar a los spammers y moderar los futuros mensajes a la lista de correo Perl-es en YahooGroups.

Si os interesa, os podéis apuntar en http://tech.groups.yahoo.com/group/perl-es/ .

Bueno, esto es lo que realmente necesito. Yo, molestando de nuevo por acá... Para la universidad donde pasaré mi proyecto para promocionar Perl debo, de alguna forma, mostrar un top 10 o algo así de los CMS, independiente del lenguaje; claro está, me interesan más los que están en Perl... Pero para ellos pues requiero saber dónde encuentro información de cuáles son los mejores CMS y por qué ^^


Gracias

Agradecería si me pudiesen indicar cómo en MYSQL puedo acceder desde una base de datos con una conexión abierta $dbh a actualizar datos de una tabla que se encuentra en otra base de datos, cuando todo debe formar parte de una transacción.

Code: Seleccionar todo

$dbh . . . . (abro la conexión para la base de datos I)

eval {
           inserto en $dbh (base I)

           tengo que insertar en la tabla de la base II

}

Si ...