#!/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";
}
|
|
|
Para Juan Luis Guerra, música no es “prioridad”
EFE
BUENOS AIRES.- Para el cantante dominicano Juan Luis Guerra, la música ya no es la "prioridad" en la vida debido a su conversión religiosa, pero aún así nunca dejará de cantar.
"Por fin entendí que ese es el rol en mi vida", afirma Guerra en una entrevista publicada en el diario argentino "Clarín". Guerra estuvo en Buenos Aires como telonero musical de dos multitudinarios mítines del predicador evangélico Luis Palau, argentino pero radicado en Estados Unidos desde hace muchos años.
El intérprete de éxitos como "Ojalá que llueva café" o "La bilirrubina", que a lo largo de su carrera ha vendido más de diez millones de discos, es una persona diferente desde 1994, el año en el que, según palabras propias, Dios entró en su corazón.
TIENE UN ARMA PODEROSA
"No tenía paz. Tenía problemas para dormir y tomaba muchas pastillas. Es más, pensaba que si ganaba un Grammy iba a estar mejor y al contrario, lo gané y seguía peor", recuerda de los tiempos anteriores a su conversión.
El músico precisa que no tiene que "ver con ninguna religión determinada" y que su "conexión es con Dios", y asegura que todos los cambios que tuvo desde 1994 "fueron para mejor".
"Soy mejor persona, mejor padre, mejor esposo, mejor músico", asegura Guerra, quien atribuye el nacimiento de su hija Paulina, trece años después del de su primer hijo, Jean Gabriel, a la ayuda divina, pues todos los tratamientos que hicieron él y su esposa, Nora Vega, habían fallado.
Guerra, cuyo último disco "No es lo mismo ni es igual" ha sido un éxito en muchos países, afirma que siempre fue espiritual y que la música es un "arma poderosa" para llegar a Dios. 
|
|
|
|
|
