Foro - Perl en Español

Hola.

Estoy intentando abrir un archivo utilizando open() mediante el siguiente script:

El error que me sale es el siguiente :
syntax error at ./sperl4.pl line 6, near "open "
Execution of ./sperl4.pl aborted due to compilation errors.

¿Me podría indicar alguien qué es lo que estoy haciendo mal??

Un saludo y muchas gracias.

El error está más arriba, en

fichero = "books"

¡¡¡ No tiene el ';' final !!!

Es:

fichero = "books";

Saludos.
P.D.: Fíjate que tampoco imprimes ningún mensaje de tarea terminada...

En realidad también soy muy novato pero yo cambiaría la línea que dice:

fichero = "books"

por:

$fichero = "books" ;

es decir, sólo agregaría '$' y ';'.

Pero si aún sigues sin poder correr tu programa quizá deberías especificar qué tipo de archivo tratas de abrir, es decir, "books.txt" o "books.dat", y no simplemente "books".


Saludos

Atte.: QUEDIFICILPERL
http://mx.geocities.com/jpablo_esfm/

Hola.

Tras cambiar y poner '$' y ';' al finalizar la línea, lo probé y funcionó. Hasta que uno se acostumbre a los ';' del final de línea...

Un saludo y muchas gracias.

¡ja,ja,ja!, es verdad, también faltaba el '$' para nombrar la variable... Por esas razones doy gracias a los editores de lenguajes... ¡je,je!

Saludos
P.D.: En la sección de tutoriales tienes uno de kidd que habla sobre variables y todo ese rollo... ¡¡¡ Está muy bueno !!!

Hola.

Es típico cuando eres principiante de Perl que te olvides de las ';' finales. A mi me pasaba todo el tiempo, y lo peor es cuando tienes un código de 5 mil líneas que de pronto no funciona, y todo porque en algún lugar falta un ';' final.

Pero llega un momento en que te acostumbras y automáticamente pones un punto y coma final.

Ahora, recuerda también que a Perl no le importan los espacios, por ejemplo, prueba los siguientes códigos:


Verás que todos tienen el mismo resultado.

Aunque recuerda que es MUY recomendable que guardes un estilo cuando programas, por conceptos de legibilidad y mantenimiento.


SALUDOS

Una pequeña aclaración:

El carácter ';' no es 'fin de sentencia', sino que sirve para 'separar sentencias'.

La prueba es que puede escribir esto en Perl:

No es necesario un ';' porque solo hay una sentencia.