Duplicar posible:
What does 1; mean in Perl?¿Qué es "1"? en una fuente de Perl?
Soy nuevo en Perl y aprender a construir una clase con Perl.
Como en este ejemplo: http://www.tutorialspoint.com/perl/perl_oo_perl.htm, veo una línea que está escrita como "1;" simplemente no se puede encontrar información sobre esta interesante línea de perldoc.perl.org
¿Sabes de qué se trata? ¿Y por qué está ahí en el código fuente de Perl?
Un módulo es normalmente un conjunto de definiciones de subrutinas, pero también puede incluir código que no está en una subrutina (como el código de inicialización). Este código puede fallar, por lo que Perl le permite indicar esto al devolver falso, luego Perl cancela con un error.
Sin embargo, como el valor de retorno predeterminado es falso, debemos devolver explícitamente verdadero al final de un módulo.
El perldocs tiene esto que decir:
El archivo debe devolver verdadero como la última declaración para indicar la ejecución exitosa de cualquier código de inicialización, por lo que es habitual para poner fin a un archivo de este tipo con
1;menos que esté seguro volverá a ser cierto de lo contrario. Pero es mejor sólo para poner el1;, en caso de que añada más declaraciones
veo, gracias mr madera – nicola
por lo que es el valor de retorno al llamar 'require' en el fichero – nicola