• Publicidad

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

Así que programas sin strict y las expresiones regulares son otro modo de hablar. Aquí encontrarás respuestas de nivel avanzado, no recomendable para los débiles de corazón.

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

Notapor creating021 » 2007-10-30 19:58 @874

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.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
package MyModulo;
use strict;

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

sub new { $algo++; }
sub del { $algo--; }
1;
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


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.
Última edición por creating021 el 2007-10-30 20:23 @890, editado 1 vez en total
Expect the worst, is it the least you can do?
Avatar de Usuario
creating021
Perlero frecuente
Perlero frecuente
 
Mensajes: 595
Registrado: 2006-02-23 16:17 @720
Ubicación: Frente al monitor

Publicidad

Notapor explorer » 2007-10-30 20:11 @882

Con variables locales my().

Si las usas dentro de clausuras, pues más seguridad.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor creating021 » 2007-10-30 20:25 @892

¿Tan simple y perfecto? :lol:

Muchas gracias, es perfecto.
Expect the worst, is it the least you can do?
Avatar de Usuario
creating021
Perlero frecuente
Perlero frecuente
 
Mensajes: 595
Registrado: 2006-02-23 16:17 @720
Ubicación: Frente al monitor


Volver a Avanzado

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados