Ayuda con un módulo
![Nota Nota](http://perlenespanol.com/foro/styles/prosilver/imageset/icon_post_target.gif)
Hola a todos. Necesito ayuda con un módulo que hice y lo exporté, pero en otro programa en el que lo uso, me dice que una función no está declarada, pero si dentro de la función le pongo print(), sí me lo imprime, está medio raro. Gracias de antemano, aquí les va el código:
Gracias por ayudar, si hice algo mal me lo podrían decir para mejorar, por favor![Smile :)](http://perlenespanol.com/foro/images/smilies/icon_smile.gif)
Using perl Syntax Highlighting
- package Monsters;
- use strict;
- use Exporter;
- our @ISA= qw(Exporter);
- our @Export = qw(Get_Monster Rand_Monster Data_Monster Monster);
- sub Get_Monster{
- open my $FILE, '<', 'mon.txt' or die $!;
- next if !$FILE;
- my @monsters = <$FILE>;
- return @monsters;
- }
- sub Rand_Monster{
- my @monsters = Get_Monster();
- my $rand = int(rand(@monsters));
- my $random_monster = $monsters[$rand];
- return $random_monster;
- }
- sub Data_Monster{
- my $monster = Rand_Monster();
- my @monster_data = split(',', $monster);
- }
- sub Monster{
- my @data = Data_Monster();
- #Entonces aca deberia poner return @data?
- }
- Monster();
- # Y este Monster() es para que ejecute la funcion Monster, que ejecuta Data_Monster que ejecuta Rand_Monster que ejecuta Get_Monster, porque segun yo si pones las funciones nada mas la declaras pero no la ejecuta, eso lo hize nada mas para probar que todo estaba bien
- #Y si tengo otro script que es el usa el modulo, va algo asi
- use Monsters;
- my @monstruo = Monster()
- #Lo raro es que en la parte donde te pone el warning, si le pongo print en la funcion de adentro del modulo, me pone el nombre del monstruo su vida y su ataque(como esperaba), pero si se lo quito e imprimo @monstruo, me dice que Monster() no esta declarada, seguro que es un error mio, pero no lo pesco :S
- 1;
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
Gracias por ayudar, si hice algo mal me lo podrían decir para mejorar, por favor
![Smile :)](http://perlenespanol.com/foro/images/smilies/icon_smile.gif)