Foro - Perl en Español

En el blog oficial de Google han sacado unas estadísticas de uso de las diferentes codificaciones que se usan en Internet, en las páginas web. En los últimos cinco años, la codificación UTF-8 ha crecido un 800%, mientras que las codificaciones ASCII y de la familia Latin (entre las que se encuentra también la cp-1252 de Windows), se han desplomado a la misma velocidad.



La última versión de UTF-8, la 6.1, cuenta con más ...

Buen día.

Antes que nada soy super nuevo en el mundo de Perl así que no sé mucho del tema... :roll:

Tengo unos GPS que me envían información a un modem GSM por mensaje de texto SMS, ya tengo listo el script que se conecta vía telnet y lee los mensajes almacenados. Pero el mensaje me viene en el siguiente formato:

Lat: N10.21614
Long: W67.34032
Speed:85.34KM/H ...

Según lo leído de FormFu http://search.cpan.org/~perler/HTML-FormFu-0.09007/lib/HTML/FormFu.pm
La forma de hacerlo es así:

$form->attributes->{id} = 'form';

$form objeto de FormFu y donde el .yml es:


---
attributes:
id: form
class: fancy_form

Ahora quiero editar el style de mi .yml


---
indicator: submit

elements:
- type: Submit
name: submit
value: Submit
container_attributes:
style: ""

y no encuentro forma de editarlo...
He intentado con:


$form->elements->Submit->container_attributes->{style} = "display:none;";
# o con
$form->elements->Submit->{style} ...

Hola,
Necesito procesar las notificaciones de PostgreSQL corriendo para cada una de ellas su correspondiente función que puede demorar unos segundos.

El siguiente código es un pequeño avance de cómo debería funcionar:
#!/usr/bin/perl
use strict;
use DBI;

my $dbh = DBI->connect( "dbi:Pg:dbname=prueba host=127.0.0.1 port=5432", '', '' ) or die "Sin Conexión!!!\n";

$dbh->do("LISTEN xdemonio");

LISTENLOOP: {
while ( my $notify = $dbh->pg_notifies ) {
my ( $name, $pid, $payload ) = @$notify;
print "$name - ...

Hola.

Estoy estancado tratando de reproducir un sonido MP3 desde Perl.

Trabajo bajo un S.O. Ubuntu, mi objetivo es reproducir un sonido en MP3 dado la dirección.

Intenté trabajar con módulos de http://search.cpan.org/search?query=sound&mode=all pero no pude solucionar.


Saludos.

¡Hola!

Tengo un problema con un programa y me dijeron que en este foro me podían ayudar. Estoy programando juegos con la librería SDL con C++, pero no avanzo mucho porque apenas soy principiante con esta librería.

El problema que tengo es que quiero hacer colisionar dos cuadrados; uno amarillo que es el "PJ" el cual puedo mover por la pantalla y otro gris que está fijo en las coordenadas (1300,1500) todo funciona bien pero ...

Hola a todos.

Tengo un problema con un script que tengo que hacer en Perl. Llevo muchos días intentando solucionarlo pero no hay manera. Ahí va:

Tengo una lista en .txt formada por una columna de tipo de factor de transcripción (TF) y otra formada por sus aminoácidos. ej:
TF1 ATLHLSNIPPSVTMDDLKNLFEAGCSVKAFKFFQKDRKMALIQLGSVEEAIQALIELHNHDLGENHHLRVSFSKS
TF1 ATLHLSNIPPSVTVDDLKNLFEAGCSVKAFKFFQKDRKMALIQLGSVEEAIQALIELHNHDLGENHHLRVSFSKS
TF1 ATLHLSNIPQNVTEDDLRLLFNTGGTVKAFKFFQDRKMALIQMSTVEEAIQALIDLHNYNMGGNQHLRVSFSKS
TF2 GKMFVGGLSWDTSKKDLKDYFTKFGDVSDCTIKFDSDSGRSRGFGFVLFKDPSSVEKVLQQKEHRLDGRLIDPKRAMAMKKEPV
TF2 GKMFVGGLSWDTSKKDLKDYFTKFGEVSDCTIKFDSDSGRSRGFGFVLFKDPSSVKKVLEQKEHRLDGRLIDPQRAMAMKKEPV
TF3 GKMFVGGLSWDTSKKDLKDYFTKFGEVTDCTIKMDPNTGRSRGFGFILFKEPGSVEKVLEQKEHRLDGRLIDPKKAMAMKKDPVKK


Lo que necesito es simple: tengo que conseguir que me lea los aminoácidos ...

Estoy haciendo un script en Perl y tengo un problema en una de las funciones.

Este es el enunciado de la función:

mostrar_directorio
Recorre recursivamente el árbol de directorio partiendo desde el directorio pasado como argumento.
(ayuda/salir)? mostrar_directorio ...
etc (Directorio)
group
passwd
script (Directorio)
config.txt
historico.txt
minishell.pl
minishell..pl~
....
Hasta ahí todo sin problemas pero ahora debo añadir...

Lo único que se debe de modificar es la salida. Esta estará claramente sangrada y ...

Hola, no sé si esto va acá xD... Lo que pasa es que tengo unos ejercicios con matrices. Pero me quedé estancado en la letra C). Las instrucciones son:

hacer una matriz y entregar matriz Traspuesta, los mayores de cada fila y ordenar la matriz usando como key el primer elemento de cada fila

Tengo este código para la A y B hasta ahora:
http://pastebin.com/r10teh0x
#!/usr/bin/perl
print "Filas:\n";
my $filas = <stdin>;
print "Columnas:\n"; ...

Buen día a todos, primero que nada estuve revisando el foro desde hace un par de meses y recién me registro :D espero me puedan ayudar.

El problema es el siguiente:

Tengo un script que funciona con threads y semáforos, el cual ejecuta una cantidad "n" de scripts de manera simultanea, en un modelo tipo productor/consumidor y es aquí donde entran los semáforos. Resulta que para ...