Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Creando módulos con.... ¿tie?

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Experto
Mensaje Mar Oct 30, 2007 6:58 pm
creating021
Vive para Perl en Español
Vive para Perl en Español
Registrado: 23 Feb 2006
Mensajes: 487
Ubicación: Frente al monitor
Creando módulos con.... ¿tie? Responder citando

Hola.

Resulta que quiero crear un módulo que debe de tener variables privadas, que sólo se puedan usar desde el módulo (por todas las funciones) pero que no se puedan modificar en los programas que usen este módulo.

Perl:
package MyModulo;
use strict;

BEGIN {
    my $algo = 1;
    tie $algo, "MyModulo";
}

sub new { $algo++; }
sub del { $algo--; }
1;


Claro, el tie está mal hecho (le falta todo lo indicado en perltie) y planeé usar Readonly pero su nombre lo dice...

Entonces necesito algo como our pero que sea privado y que se pueda modificar como yo lo intento.

¿Hay algún módulo o forma de hacer esto?

Gracias.

Ultima edición por creating021 el Mar Oct 30, 2007 7:23 pm, editado 1 vez
Mensaje Mar Oct 30, 2007 7:11 pm
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4143
Ubicación: Valladolid, España
Responder citando

Con variables locales my().

Si las usas dentro de clausuras, pues más seguridad.
Mensaje Mar Oct 30, 2007 7:25 pm
creating021
Vive para Perl en Español
Vive para Perl en Español
Registrado: 23 Feb 2006
Mensajes: 487
Ubicación: Frente al monitor
Responder citando

¿Tan simple y perfecto? Laughing

Muchas gracias, es perfecto.
Publicar nuevo tema   Responder al tema    Foros de discusión -> Experto Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group