variables en perl

[Raul21]

Hola;

Me gustaría saber como se hace en perl para que se declare una variable en un script de perl, cuando se ejecute dicho script esa variable adquiera un valor (por ejemplo =1), y la proxima vez que se ejecute el mismo script esa variable siga teniendo el mismo valor (en este caso 1) a no ser que en el propio script se le asigne otro valor.

En resumen querria tener una variable que tuviese memoria del valor que tenia tras la ejecucion de la vez anterior.

Gracias, un saludo.

[jferrero]

A eso se llama persistencia.

En Perl lo puedes conseguir con la función tie(), que une una variable tipo hash con un fichero de tipo dbm.

Hay otras opciones, como el módulo Storable, que te permite guardar y recuperar valores:

Código Perl:

use Storable;
 
my %tabla = %{ retrieve('fichero') }; # Recuperar %tabla
 
# ...
 
store \%tabla, 'fichero';             # Almacenar %tabla
 

Lo único que tienes que hacer es recuperar la información al principio del programa, y grabarlo cuando esté terminando. Tienes el peligro de si el programa se cuelga hacia la mitad, pero si está bien hecho, no debería pasar nunca.

[Raul21]

Muchas gracias por tu información.

Voy a ver como lo puedo usar.

Gracias.

Un saludo