|
|
EL HUMOR DE
|
 |
#!/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";
}
|
|
AMUNIC
Ley de Catastro, herramienta para los municipios
La aprobación de la Ley del Catastro es un logro de los municipios de Nicaragua, ya que ahora se definen las atribuciones del catastro municipal y la competencia exclusiva para realizar las evaluaciones catastrales.
La ley establece que gradualmente los municipios se irán incorporando al establecimiento y mantenimiento del catastro, de acuerdo a las capacidades de los alcaldes y los requisitos que la ley establece, así como la supervisión idónea de una autoridad nacional, la Dirección Nacional de Catastro Física.
Unificarlo con Registro Públicode la Propiedad
El Catastro pretende, en Nicaragua, unificarse con el Registro Público de la Propiedad.
Entre los aspectos por mejorar se mencionan la reconstrucción de la Red Geodésica Nacional, nueva cobertura fotogrametría en las zonas catastradas del país, así como la elaboración de fotomapas digitales e imágenes satelitales
Desde 1967 que se empezó el catastro en Nicaragua se logró cubrir solamente 22 mil kilómetros cuadrados.
Esa extensión correspondía a ocho departamentos que estaban localizados en el litoral Pacífico de Nicaragua y también algunas manchas urbanas de Estelí, Juigalpa, Boaco y Matagalpa.
Cortesía AMUNIC
Los criterios expresados en esta columna son responsabilidad exclusiva de las instituciones que las elaboran y no representan el criterio editorial del diario LA PRENSA.
|
|
|
Derechos Reservados 2002. La información contenida en
este medio de comunicación, no puede ser reproducida ni
publicada, parcial o totalmente, en ningún otro medio
de comunicación privado o público, sin el consentimiento
por escrito de LA PRENSA S.A
|
|
|
