Foro - Perl en Español

Hola a todos.

Ando teniendo una duda porque quiero capturar el texto de un label en
Tk y no sé cómo hacerlo.

use Tk;

my $new = MainWindow->new;
$new->Label(-text=>"hola")->pack();

MainLoop


¿Alguien me podría ayudar a sacar ese simple "hola"?

Hola perleros

Tengo interés en aprender a usar.

WWW::Mechanize;

He encontrado la siguiente dirección pero no me gustó mucho.

http://www.higherpass.com/Perl/Tutorials/Using-Www-mechanize/

¿Conocen ustedes algún sitio de Internet con una buena introducción y ejemplos de este módulo?

Muchas gracias por la colaboración.

Carlos

Hola amigos.

Tengo un formulario, en el que habilito o deshabilito en forma dinámica ciertos controles del mismo. Al hacer submit, y tratar de recibir los datos enviados, éste no los recibe si el control tiene:

$enable = "false";
-disabled=>$enable


Este es el código completo:

use CGI qw/:standard *Tr *table *td/;
use HTML::Myasp;
use SBMP::XSesion;
use SBMP::Documento;
use POSIX qw(strftime);

if (param('accion') eq "G") {
print $id_sistema ." ". $id_origen ." ". ...

Hola, hace un tiempo me uní a este foro para solucionar un pequeño problema con un script que uso en TeX. Ahora tengo otro problema, deseo añadir la opción -h al script pst2pdf, es decir, comentar la línea 363 y con Getopt::Long; y Pod::Usage; crear la ayuda de dicho script, pero, todos mis intentos han fracasado, el script solo me dice que tengo un error en la línea 77 (arroja Unknow option -h); además, me ...

Tengo una imagen JPG que me genera mi sistema cada vez que capturo un pase de satélite.

Me gustaría subir esta imagen por FTP a mi página web (se machacaría la existente del servidor web) cada vez que se genera.

El programa en Perl se estaría constantemente ejecutando en espera de la entrada de la nueva JPG.

¿Cómo se hace esto?

Es urgente. Saludos y gracias.

He cargado el package Net-Ftp-File.

De momento este es ...

Saludos a todos/as,

Este es mi primer post. Estoy iniciándome en Perl, disculpad mi torpeza si desvarío en alguna cosilla.

Estoy interesado en configurar Perl para que funcione en local con el servidor HTML y contenedor de servlets Jetty. Todo ello instalado sobre Ubuntu 10.10.

No consigo indicarle que permita la ejecución de CGI Perl a través del navegador.

En el documento web.xml almacenado dentro de WEB-INF del proyecto test, tengo la siguiente configuración sobre ...

Tampoco he dicho que no sé nada de lenguajes informáticos, sé lo básico. En cuanto a la pregunta ¿cuántos años has estudiado informática? Ninguno. Yo estoy estudiando Biología y en este curso he tenido una asignatura sobre programación. He dado lo más elemental y por eso, en ocasiones, ante problemas algo más complejos me atasco bastante.

La siguiente consulte se me cae en el while() y solo cuando busco una sola vocal, no entiendo por qué.

if (defined $dbh) {

if (defined $dp_s) {

$sql = q/
SELECT DP_CODE,
DP_NAME,
DP_STATUS,
DP_ISI_OFFICE,
DP_COUNTRY,
DP_FORMATTING_OFFICE,
LOCAL_DP_NAME
FROM DP
WHERE UPPER(DP_CODE) LIKE ?
OR UPPER(DP_NAME) LIKE ?
/;


if ((defined $start) && (defined $end)) {
$aux = $sql;
$sql = undef;
$sql = "Select * From (Select a.*, ROWNUM r From ($aux) ...

Buenos días. Tengo tres días empezando a trabajar en Perl, con poca noción en programación. Ha sido difícil, pero en mi poco conocimiento he hecho algunas cosas.

Aquí está mi programa. El mismo lee un archivo txt, compara con una base de datos y ya inserta en una tabla de la base de datos.

Necesito saber cómo sacar errores en la base de datos DBI, pasar el error al log y mandar por mail.


Código ...

Estimados compañeros,

Buen día. Hoy recurro a ustedes ante una pregunta producto de mi clase de bioinformática, a la cual no he encontrado la manera de abordarla. El profesor nos pide hacer un script llamado cuentapalabras.pl. Este script debe buscar "palabras" (más bien dicho, "conjunto de bases") de una longitud especificada por el usuario, las cuales están dentro de un archivo de texto. Dicho script debe de tener un "uso: <Tamaño de palabra> <archivo de ...