Foro - Perl en Español

por **60N2410** » 2011-12-22 05:53 @287

¡Hola!

Tengo definido un archivo de funciones "funciones.pm" ubicado en /usr/share/perl5/, en el cual tengo definida una función "func($parm)" que recibe el string $parm y retorna un arreglo. Luego, en mi programa principal hago esto:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

.....
use funciones;
.....
.....
sub buscar{
...
my $lista = Gtk2::SimpleList->new(
                        Nombre => 'text'
            );
....
$lista->signal_connect (row_activated => 
   sub{
      my ($slist, $path, $column,$ref) = @_;
      my $row_ref = $slist->get_row_data_from_path ($path);
      my @arreglo=@{$row_ref};
      my @arr=func($arreglo[0]);
      ....
   });
.....
}
 
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

Al llamar a la función func() dentro del callback me da el siguiente error:

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

*** unhandled exception in callback:

***   Unexpected EOF at /usr/share/perl5/funciones.pm line 328.

***  ignoring at ./principal.pl line 1069.
Coloreado en 0.000 segundos,  usando GeSHi 1.0.8.4

Pero si la llamada a la función la hago fuera del callback en cualquier otro lugar, funciona perfectamente. Pero necesito llamarla dentro del callback ya que preciso el dato que se selecciona al dar doble clic en la lista.

¿Alguna idea de lo que puede estar pasando?

¡Muchas gracias!

El error dice que se ha encontrado un fin de fichero en la línea 328 de funciones.pm.

Es posible que el programa esté llamando a la callback antes de que el fichero haya sido abierto. O que haya ocurrido un close() del fichero antes de la llamada.

P.D. No necesitas colocar funciones.pm en un directorio del sistema. Valdría con ponerlo en el mismo directorio donde está el programa principal.

Foro - Perl en Español

Error al llamar función en callback

Error al llamar función en callback

Publicidad

Re: Error al llamar función en callback

¿Quién está conectado?