#!/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";
}
|
|
|
Bolaños teme otro “cuchubaleo” Alemán-Ortega
 |
|
 | Reforma a Contraloría sería punto de partida |
|
El presidente Enrique Bolaños recibe una gorra como obsequio de los empresarios de la construcción, al ingresar al local en donde se desarrolla la Feria de la Construcción que culmina hoy. |
| |
Consuelo Sandoval
consuelo.sandoval@laprensa.com.ni
El presidente Enrique Bolaños no descartó ayer un nuevo pacto libero-sandinista por las pretensiones de ambas agrupaciones políticas de someter ante la Asamblea Nacional una reforma a Ley Orgánica de la Contraloría que podría restarle facultades a la Procuraduría.
“Todo es peligroso, nadie sabe, yo no pacto, yo puedo comprender que de repente los diputados puedan decir ‘yo voto por tu moción, pero vos votá por la mía’, pero son razones diferentes, pero no por pacto, porque conlleva cuchubaleo, pueden decir mitad y mitad y nos repartimos este pastel. Es una cosa muy diferente”, expresó.
Recordó que conversó con varios legisladores para que desistieran de presentar una iniciativa para interpretar la Ley Orgánica de la Procuraduría y que, según varios reconocidos juristas, pretendía otorgarle a la Contraloría la presentación definitiva de la carga de prueba en los procesos judiciales.
Bolaños reiteró que su lucha contra la corrupción no tiene nombre y apellido, refiriéndose al ex presidente Arnoldo Alemán, quien comentó en días pasados que se siente “lacerado” por la actuación del mandatario.
“Yo no me siento lacerado ni cantidad de gente que está en el país se siente lacerada, pero ésta es una cosa que tiene que pasar para que podamos enfrentar de cara a la gran tarea que tenemos por delante, que es la lucha contra la pobreza y el desempleo”, dijo
Bolaños se congratuló por la invitación a la cena que recibió del diputado Alfonso Ortega Urbina, en desagravio por el desaire que recibió de varios legisladores que por órdenes de Alemán no asistieron, y de quienes espera se disculpen.
“Al principio eran pocos (los diputados que asistirían), ahora parece que todos quieren estar allí. Habrá unos traguitos y después una cena. Yo no sé lo que van a decir, pero (espero que digan), señor, le pedimos disculpas, así como usted ha tenido el valor y el coraje de pedir disculpas cuando se ha equivocado. Yo acepto esas disculpas”, auguró.
Citando un capítulo del libro de una escritora siria denominado “Manual del ciudadano contemporáneo”, referido a la declaratoria de la guerra y la paz, Bolaños dijo confiar en la reciprocidad de sus gestos de paz de parte de la dirigencia liberal que, según él, le ha declarado la guerra unilateralmente a través de sus medios de comunicación.
“Ojalá (Arnoldo Alemán), haga la correspondencia que se necesita (para declarar la paz)”, sostuvo.
Negó que su reacción de despedir de la Presidencia a Gloria Navarro, hija del diputado Wilfredo Navarro, haya sido porque el legislador faltó a un compromiso acordado. 
|
|
|
|
|
