Foro - Perl en Español

Tengo un programa con operaciones "Operaciones.pl", que instancia nuevos objetos o clases Operaciones::Division, Operaciones::Suma, etc... si el resultado de la operación se llevó con éxito se retorna el resultado de tal operación. Ejemplo: 6/3 = 2 (se retorna el 2), pero para el caso de que la operación haya fallado: 6/0 = No existe, se retorna un objeto que indica qué tipo de error es, de la forma Operaciones::Error(...).

Para el caso del retorno del objeto "Operaciones::Error(...)", Perl lo leía muy bien, y podía seguir trabajando correctamente. La comparación la hago con expresiones regulares:



Hace unos días, esto dejó de funcionar, y ya no entraba jamás al if.

¿De qué forma puedo solucionar este tema?

Muchas gracias

Hola, Explorer.

El código lo tengo en otro equipo, por lo que aún no te puedo subir el fragmento de éste.

He hecho los print() cnrrespondientes, y la variable tiene el nombre del objeto (ej: Objeto::Figura(...)) como cuando imprimes un hash.

El problema era que sí funcionaba, y no sé qué pudo pasar. En realidad, no volví a tocar el módulo, hasta ahora.

Leí otros threads y se indicaban unos módulos de CPAN para saber si la variable era int, double, etc... ¿Algo similar que sirva para saber si es una clase objeto?

Thanks

El problema se solucionó, y al final, de la forma que lo había hecho en un principio estaba bien... este error venía de otra parte, en la clase Error...

Gracias de todas formas.

El debug fue mi salvación