Foro - Perl en Español

Hola, evalúo PostgreSQL + Cpp + ncurses bajo Linux y consola. No quiero nada con los toolkits gráficos.

Recientemente he estado revisando Perl, por lo fácil y documentado que están sus módulos y scripts, pero no consigo mucho referente a ncurses dentro de Perl. ¿Alguno de ustedes tiene experiencia en ello?

De antemano, Mil gracias.

Bueno, habiendo explorado la opción de SOAP & Perl, me interesaría armar un servicio web en Perl con filosofía REST (digo así pero es un nuevo concepto para mi) que según la definición y recomendaciones en estos foros es interesante tener en cuenta…

Por ello agradeceré si alguno realizó un servicio web o cuenta con algún ejemplo para poder montarlo y luego armar el cliente… adecuado.

Existen dos filosofías a la hora de escribir servicios ...

Hola quiero hacer una verificación de que una variable solo contiene números


$ver = "palabra123";

if ($ver=~/^\d+/) {
print "numero\n";
} else {
print "palabra\n";
}


EL problema es que no puedo reconocer que esa variable realmente solo tiene números.

¿ Alguna idea ?

Hola señores,

Soy nuevo en el foro y necesito de un poco de su ayuda. Les cuento: necesito realizar un sistema el cual me permita comparar la hora de un servidor central versus la hora de un servidor ntp externo, en este caso (http://www.horaoficial.cl/). La idea es comparar estas dos horas y ver el margen que tiene una de otra.

El problema que tengo es que no sé y ...

Tengo la siguiente función que borra repetidos en un array

sub repes {

my @no = ( "no", "si" );

foreach my $palabra (@_) {
next if $repety{$palabra}++;
push @revisado, $palabra;
}
return @revisado;
}


Mi duda es: ¿cómo tengo que hacer qué para que la función borre los repetidos
pero no los que están en el array @no?

¿ Alguien sabe ?

Tengo este código donde puse la expresión regular bien hecha pero cuando la saco para usarla el script automáticamente le saca las barras y la expresión regular sale mal.

@test = ("\('hola'\)\/");
$texto = "('hola')/";

for my $tes (@test) {
if ( $texto =~ /$tes/ ) {
print "yeah\n";
}
}


¿ Cuál es el error ?

Hola muchachos, he estado revisando el foro y los tutoriales y no he podido encontrar un tema relacionado al manejo de archivos PDF ¿o es que el manejo es igual que con otros archivos? Bueno, lo que yo estoy tratando hacer es descargar un pdf de una página: http://www.abc.com/docuemnto.pdf. He estado averiguando y buscando módulos pero no los encuentro. Tal vez puedan ayudarme ustedes. Gracias.

¡Vaya semanita!

En estos días, se han publicado Perl v5.12.4, Perl v5.14.1, y ahora... Perl v5.15.0.

Y con unos cuantos cambios:

* CORE:: trabaja con todas las palabras claves

El prefijo CORE:: ahora puede ser usado en palabras clave activadas por feature.pm, incluso fuera del ámbito del use del feature. Se han actualizado los archivos de la documentación sobre CORE, feature, perlfunc, perlsub, y perlsyn.

* continue ya no requiere la feature "switch".

La palabra ...

Hola, estoy haciendo un script que genera palabras para formularios POST.
El problema es que los genera en una variable normal. Un ejemplo de cómo
queda es así:


#!usr/bin/perl

use LWP::UserAgent;

my $nave = LWP::UserAgent->new;
$nave->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12");
$nave->timeout(5);

my $tengo = qq({"probar" => "test","probarx" => "et","control" => "mandar"});
print $nave->post("http://localhost/test/a.php",$tengo)->content;


Soy consciente de que sacando qq() el método POST lo va hacer bien pero
el ...

Desarrollo aplicaciones que se ejecutan en entornos web usando módulo CGI y Fast CGI. Me gustaría saber qué módulos me recomendarían para el diseño de las interfaces de usuario, la generación de formularios HTML, menúes, botones, etc, pero siempre tratando de lograr una sintaxis prolija en Perl.

¡¡ Agradecido !!