#!/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";
}
|
|
|
“Luna de miel” de Fox se acaba
AP y CNN
MEXICO.- El presidente de México, Vicente Fox, quien llegó a la Presidencia el 1 de diciembre generando un entusiasmo sin precedentes tras romper con 71 años de dominio de un solo partido, enfrenta ahora una baja en sus niveles de popularidad.
Fox rompió el año pasado con el dominio del Partido Revolucionario Institucional (PRI). Su eslogan de campaña: “hoy, hoy, hoy’’ se ha convertido en una frase popular.
Pero sólo cinco meses después, la “luna de miel’’ de Fox podría estar llegando a su fin, aunque a él no parezca preocuparle mucho. Fox no ha mostrado señales de retirar un plan para extender el impuesto al valor agregado (IVA) de 15% a alimentos y medicinas, incluso cuando los inconformes ante la propuesta han comenzado a increparlo en actos públicos y el Congreso ha dado señales de que no aprobará la medida.
El secretario del Medio Ambiente, Víctor Lichtinger, consideró que el nuevo gobierno promoverá cambios en el país, aunque tenga que pagar “costos políticos’’ por ello.
La visión de Fox de un México donde los indígenas viven en paz, los ciudadanos voluntariamente pagan los impuestos y los fondos del Estado están repletos de dinero para escuelas, hospitales y caminos, ha chocado con un Congreso hostil.
“Ha sido muy rápida la manera en que el presidente ha bajado del pedestal”, opinó Lorenzo Meyer, un historiador del prestigioso Colegio de México.
La aureola de invencibilidad de Fox, reforzada por una imponente presencia física y una voz imperiosa, ha sido golpeada por dos grandes reveses en el Congreso, controlado por la oposición.
Sus propuestas sobre los derechos de los indígenas, vistas como un paso clave para poner fin de forma permanente a la insurrección de los zapatistas en el estado de Chiapas, fueron diluidas en el Congreso y la legislación resultante fue rechazada tajantemente por los rebeldes.
La indiferencia de Fox ante las protestas ha irritado a algunos mexicanos, que desean ver que su mandatario no sólo sabe perseverar —como los hizo en la campaña— sino también escuchar.
Fox parece confiar más en una filosofía de automejora al estilo estadounidense, en su propio sentido de lo correcto derivado de su educación jesuita y en una creencia personal de que traerá cambios a México, más que en cualquier encuesta de opinión.
BAJA EN POPULARIDAD
El índice de aprobación al presidente ha caído de 70% en febrero a 65% esta semana. Asimismo, 53% de quienes votaron por Fox dijeron que no lo habrían hecho si hubieran sabido que iba a elevar los impuestos, según una encuesta del diario Reforma, con un margen de error de 2.8 puntos porcentuales.
CANCILLER "HABLA DE EXITO"
- El secretario de Relaciones Exteriores de México, Jorge Castañeda, manifestó el jueves que la primera etapa de la transición mexicana desde que Vicente Fox se convirtiera en el primer presidente de un partido político de la oposición, ha concluido con un ‘’éxito indudable’’.
- “Ha sido una alternancia sin sobresaltos económicos, sin crisis económicas, donde se entrega el poder de una manera ordenada, pacífica y tranquila, y donde se recibe el poder de una forma muy organizada y muy preparada’’, dijo Castañeda. 
|
|
|
|
|
