CGI's Externos ¿como llamarlos?

[Delfin]

Esta sería la libreria tienes que escribir la primer letra en mayusculas y terminar con la extencion .pm

Fonts.pm

package Fonts; # Tiene que se el nombre identico
require(Exporter);
@ISA=qw(Exporter);
@Export= qw (Fuentes);

sub Fuentes{
my ($todostusparametros)=@_;
@resultado=$conexion->ConsultaBD("Select...");
No se todo tu CGI que quiere hacer una funcion

return(@Fuentes}
}

Y en tus cgi lo unico que necesitas tener es:
use Fonts.pm

e instrucciones de llamada a la funcion fuentes.

Sabes manejar los arreglos asociativos?
Creo que te fuiste por un camino mas largo pero igual de interesante.

Espero haber podido ayudarte


<br><font color="Blue">"Si exagerasemos nuestras alegrías como hacemos con nuestras tristezas, nuestros problemas perderían importancia"[/CODE]
<br>[B]Anatole France[B]