#!/usr/bin/perl
use Mail::Sendmail;
require "cgi-lib.pl";
#variables que recibira de su forma
#los nombres dentro de $in (results, subject, etc) deben coincidir
&ReadParse;
$results = $in{'results'}; delete $in{'results'};
$subject = $in{'subject'}; delete $in{'subject'};
$sendto = $in{'sendto'}; delete $in{'sendto'};
$form = $in{'form'}; delete $in{'form'};
$website = $in{'website'}; delete $in{'website'};
delete $in{'submit'};
delete $in{'Submit'};
delete $in{'Reset'};
$url = $ENV{'HTTP_REFERER'};
$fecha = time();
&PrintError("No se especifico un email.") if ($sendto eq '');
&PrintError("No se especifico un subject.") if ($subject eq '');
&PrintError("No se especifico pagina de resultados.") if ($results eq '');
&send_an_email;
&send_a_redirect;
sub send_an_email
{
$date = &getDate;
$info = "Alguien ha llenado información en el formulario de $form:\n $url\ncon la siguiente información:\n";
$info .= "Date: $date\n";
$info .= "\n";
$info .= "\n";
foreach $key (keys(%in)) {
$info .= " $in{$key}\n";
}
$info .= "\n---Fin del mensaje---";
%mail = ( To => $sendto,
From => 'Foro La Prensa ',
Subject => $subject,
Message => $info
);
&sendmail(%mail) or die $Mail::Sendmail::error;
}
sub send_a_redirect
{
print "Location: http://$website/$results\n\n";
}
sub getDate{
@RealDay = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat");
@RealMonth = ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime (time);
$year += ($year < 90) ? 2000 : 1900;
$mins = (sprintf ("%02d",$min));
$daweek = $RealDay[$wday];
$month = $RealMonth[$mon];
#if ($TZ eq "") {
# offset in hours
#my $offset = sprintf "%.1f", (timegm(localtime) - time) / 3600;
#my $minutes = sprintf "%02d", ( $offset - int($offset) ) * 60;
#$TZ = sprintf("%+03d", int($offset)) . $minutes;
#}
$am = "AM";
$am = "PM" if($hour>12);
$hour -= 12 if($hour>12);
return "$daweek, $mday $month $year $hour:$mins $am -0600";
}
|
|
|
INCAE apuesta por TLC con EE.UU.
 |
|
|
Roberto Artavia. (LA PRENSA/I. Hernández) |
| |
Gabriel Sánchez C.
gabriel.sanchez@laprensa.com.ni
ALAJUELA, COSTA RICA.- La firma del Tratado de Libre Comercio entre Estados Unidos y Centroamérica, conocido como Cafta por sus siglas en inglés, será una oportunidad para que los empresarios y gobiernos busquen la especialización económica, consideró Roberto Artavia, rector del Instituto Centroamericano de Administración de Empresas (Incae).
El catedrático participó en el seminario “Los mitos del Tratado de Libre Comercio”, realizado el jueves en la sede costarricense de esa institución.
Según Artavia los problemas económicos de la región y la falta de competitividad en algunos sectores no son situaciones originadas por el Cafta, “son más bien situaciones que se han presentado por problemas de visión empresarial que existe en los productores”, indicó.
Recordó que los problemas de pobreza y subdesarrollo “tampoco han sido propiciados por este acuerdo comercial, sino que son cosas que tienen mucho tiempo de afectar estas sociedades”.
Por ello consideró que el hecho que se firme el TLC con la mayor economía del mundo servirá para generar una mayor competencia en los mercados locales, para que se estabilicen las reglas del juego, lo cual permitirá también mayores flujos de tecnología y capital en los países que lo integren y acelerará el proceso de integración.
Artavia cree que el Cafta afectará de forma positiva a la población ya que permitirá que las crecientes exportaciones generen fuentes de trabajo y salarios mejores, aunque habrá sectores que serán los grandes perdedores, con los cuales se debe trabajar con tiempo para transferir los recursos y que aprendan hacer bien otras cosas.
Para sacarle provecho al Cafta, el rector del Incae consideró que hay que hacer mejoras sustantivas en los sistemas de atracción de inversiones, el restablecimiento de los programas de promoción de las exportaciones y una mejora en las áreas que fomenten un mejor clima de negocios.
MÁS CALIDAD
El Tratado de Libre Comercio entre Estados Unidos y Centroamérica, mejor conocido como Cafta, hará que las empresas desarrollen estrategias de competencia con cambios de actitud sin perder de vista su misión.
Según Roberto Artavia, rector del Instituto Centroamericano de Administración de Empresas (Incae) esto demandará una profesionalización del personal y una capacitación a todos los niveles.
Así mismo impulsará una constante inversión en la productividad, donde la investigación de los mercados será importante para saber llegar y darle a los consumidores finales lo que quieren. 
|
|
|
|
|
