Foro - Perl en Español

Tengo un problema con while, y es que no me deja usar las letras.

#!/usr/bin/perl
print "Introduce un numero: ";
$n1=<STDIN>;
while ($n1 != 0) {
print "Introduce un numero: ";
$n1 = <STDIN>;
}

Si introduzco una letra o palabra, ya me termina el bucle sin teclear el 0.
Además eso no es todo yo quiero que termine al teclear una palabra. Concretamente 'exit'.

#!/usr/bin/perl
print "Introduce un numero: ";
$n1=<STDIN>;
while ($n1 != ...

Saludos Perleros, les comento que hoy comienza un proyecto con traps, pero no tengo idea de lo que sean, me podrían iluminar.. :?: que son para que sirven comentarios sobre ellos relacionados con Perl y alguna idea de como hacer un trap con perl,, se los agradecería,
:?

Hola, estoy empezando en AJAX y estoy ejecutando ejemplos hechos en Internet, y estoy ejecutando un ejemplo explicado en la dirección: http://www.desarrolloweb.com/articulos/ ... x-php.html, pero no me funciona.

No sé por qué es, estoy cansado de modificar cosas pero no sé qué es lo que falla porque yo le doy al select y no hace nada, no se carga el 2º select; el código es:

<?
//incluímos la clase ...

Hola:

Soy nuevo así que antes de nada presentarme.

Soy José María y me estoy iniciando en esto del Perl.

En mi empresa trabajamos con Perl pero sólo en la parte de hacer programas batch.

La parte visual la trabajamos con VisualAge for Java de IBM pero estamos buscando un entorno de programación de ventanas (tipo PowerBuilder por ejemplo) pero que la programación de eventos sea en Perl.

¿Me podéis indicar algunos y la valoración ...

Hola buenos días...

¿Alguien me podría explicar qué hace el eval?... Por lo que he leído, evalúa una expresión pero aquí no entiendo, aparte el <>, no sé qué haga...

Les mando el código que estoy tratando de entender para implementar en mi dbxml...

Y si alguien me puede decir también dónde encuentro algo al respecto para leer lo agradecería mucho...

¡¡¡Saludos!!!

eval {
print "Deleting documents for expression: '$query'\n";
print "Return to continue: ...

¡Hola!

Estoy buscando un manual que explique los sockets, expresiones regulares, patrones de búsquedas, manejo del navegador (get, post), y algunas que otras cosillas complicadas.

Hola, he reailizado una aplicación web con php y mysql y uso phpMyAdmin para administrar la BD. Yo programaba en mi portatil en localhost y todo iba bien, pero al 'instalar' la base de datos en el servidor tuve que cambiar el nombre del servidor en phpMyAdmin de 'localhost' por la ip del servidor '192.26.0.200' y a partir de ahí la aplicación funciona bien pero no puedo acceder a phpMyAdmin, cuando escribo en el navegador: ...

Buenas, estoy comenzando recién en Perl. Estoy ocupando el compilador para Linux y el de BSD y el siguiente código no me manda error, pero cuando lo paso a un Linux... me manda error.

$sLineTmp = "@fText\n";

if( $sLineTmp =~ /^\d/ ) {

el error me lo manda en el if... con el siguiente mensaje:

Code: Seleccionar todo

syntax error .... near ") { "

Espero me puedan ayudar... Gracias.
Saludos.
...

Lo que estoy intentado hacer es entrar en una web y buscar una palabra mediante grep. Y si existe que me lo confirme.

use IO::Socket::INET;
$sock = IO::Socket::INET->new(PeerAddr => "www.google.es", PeerPort => 80, Proto => "tcp");

$grep= "$sock | grep Web";

if($grep == 0) {

print "NO EXISTE\n";
}
else {
print "EXISTE\n";
}

Con ese script estoy intentando entrar a google y si me encuentra la palabra "Web" que me imprima "EXISTE". Pero ese ...

Hola. Yo estoy iniciando en lo que es Perl. Quisiera saber si alguien sabe cómo se manda un archivo de salida en txt, es decir estoy leyendo un archivo y lo que arroje mi resultado quiero enviarlo a un archivo txt. ¿Como le puedo hacer?