[caracas-pm] CGI::Application??

[Alexis Arnal]

Saludos, estoy probando algunas de las cosas que hablamos el sábado en
la reunión de Perl Mongers y me surgió una duda

Utilizando CGI::Application ¿Cómo hago para pasarle parámetros a al
módulo principal desde el wrapper que ejecuta la aplicación?

Estoy haciendo lo sgte:

#!/usr/bin/perl -w
use Foo; 

$basedatos="dbfoo";
$host="127.0.0.1";
$port="5432";
$driver="dbi:Pg:dbname=$basedatos;host=$host;port=$port";
#-----------------
my $webapp = Foo -> new(
					TMPL_PATH => '/var/www/sirehu/',
					PARAMS    => {	'driver' => $driver }
                                        );  
$webapp -> run();
#-----------------

No se como pasar $driver al módulo principal y como llamarlo cada vez
que lo necesite
-- 
#--------------------
#!/usr/bin/perl -w
#--------------------
# Ing. Alexis Arnal
# GNU/Linux user: 378161
# Debian - Kernel 2.6.7-1-386
# Caracas - Venezuela
#---------------------
use strict;
print "No basta con alcanzar la sabiduría, es necesario saber utilizarla\n";
print "Marco Tulio Cicerón. 106 AC-43 AC. Escritor, orador y político romano\n";
print "http://www.proverbia.net";
#---------------------