Paracas Febrero 2008

Desde hace tiempo tenia deseos de ir a visitar Paracas (Pisco - Ica), siempre por uno u otro motivo posponia la visita o no me animaba, este año luego de muchas dudas e indesiciones, realizamos esta aventura de paseo; claro que recibi varios comentarios de que la Ciudad de Pisco estaba muy mal hice caso de estos comentarios y programe mi vista.

Como podran ver en la foto de la derecha tengo hijos pequeños, por tanto tuve que programar el horario del paseo para que ellos gozaran, aqui los detalles por si se animan a hacer algo similar.

Decidimos salir de Lima en el horario de las 3 am (S/ 20 el costo del pasaje ) - esto para evitar ver la ciudad en mal estado y que los niños queden impactados por esto - tuvimos que hacer dormir a mis hijos a las 7 pm.

Llegamos al cruce de Pisco y la Panamericana a las 7 am, tengo la mala suerte que en cada viaje en omnibus encuentro a algun pasajero que ronca como tren serrano, asi que me fue un poco dificil dormir; de ahi tomamos un colectivo hasta Paracas (aprox. 15 minutos de viaje y S/. 18 de costo); ahi hay gran cantidad de empresas que brindan el servicio para pasear en lanchas por las Islas Ballestas el costo es de S/. 40 por adulto y S/. 30 por niño (se puede negociar) ; 08:30 am nos embarcamos para el paseo deseado.

El paseo me resulto sorprendente desde ver como los Lobos de Mar de forma tan habil y graciosa se meten en el cerco formado por las redes de pescar hasta la neblina que se presento, ver el Candelabro inmenso que puede ser observado en toda su magnitud desde el mar.

El paseo se puso aun mejor, pudiendo ver a las Aves Guaneras ( Pelicanos Peruanos, Cormoranes, Gaviotas y Gaviotines ) , los Pinguinos y los Lobos Marinos con sus auillidos caracteristicos, ademas de verlos muy cerca del deslizador, resulto sorprendente ver la cantidad de lobos que habian en la Isla; la vista de estos fue impresionante para todos.

Hasta ahora he tenido pocas vaciones, pero creo que ninguna he gozado tanto como estas, bonitos recuerdos, excelente fotos y maravillosos momentos con la familia; consideren ir a visitar las Islas Ballestas, no solo contentense con verla en fotos, es peruana y la tenemos cerca asi que aprovechen.

Continúa...

Postgres: Realizar backup de BD

Aqui un procedimiento bastante sencillo que permite sacar Backup de la Base de Datos en Postgres, claro esta utilizando un script en Bash.

#!/bin/sh
#
echo "---------- Captura fecha -----------"
fecha=`date +%Y%m%d%H%M`
#
echo "-------- Borra si existiera --------"
rm -f /home/postgres/backup/bk1$fecha.tar
rm -f /home/postgres/backup/bk2$fecha.tar
echo "---------- Haciendo pg_dump --------"
pg_dump -Ft -b cm_pan > /home/postgres/backup/bk1$fecha.tar
pg_dump -Ft -b cargom > /home/postgres/backup/bk2$fecha.tar
#
gzip /home/postgres/backup/bk1$fecha.tar
gzip /home/postgres/backup/bk2$fecha.tar
#
echo "----------- Final -------------"

Como complemento se debe de colocar en el crontab del usuario postgres para que se ejecute tantas veces sea necesario y asi sacar los Backups varias veces al dia.

Continúa...

Apagar a determinada hora un equipo con Linux

Es un proceso sencillo y muy basico, muchas veces he encontrado algunos datos no muy exacto o un poco enredados, utilizando algun script o pasando parametros.

La forma mas sencilla que encontre para apagar el equipo fue haciendo lo siguiente:

1.- Ingresar al crontab como root

crontab -e

2.- Agregar la linea de apagado:

00 22 * * * /sbin/shutdown -hF now

Con esto le decimos que se apague diariamente a las 10 de la noche o 22:00 hrs.

Continúa...

Función que escriba en letras una cantidad numérica

La siguiente función la recibí vía correo de una de las listas de Postgresql, si bien es cierto no la hice debo de señalar que si la enviaron a la lista se puede hacer publica, excelente función Ramiro Arenas

CREATE FUNCTION cletra(numeric) RETURNS character varying AS $_$
declare

ptotal alias for $1;

total numeric;
total1 numeric;
cent2 numeric;
cent numeric;
cent1 char(2);

mil numeric;
millon numeric;
millones numeric;
sav numeric;
unit numeric;
deci numeric;
centi numeric;
factor numeric;
sav1 numeric;
depesos numeric;
lletra varchar;
letras varchar;

begin

total := ptotal;

total1:= total;
total := trunc(total);
cent2 := total1 - total;
cent := cent2*100;
cent1 := '00';

if total=0 then
lletra := 'CERO PESOS';
return 'CERO PESOS';
end if;

mil:=0;
millon:=0;
millones:=0;
depesos:=0;
sav:=1;
unit:=1;
deci:=1;
centi:=1;
factor:=1;
sav1:=1;
letras:=' ';

while total > 0 loop
if total > 1999999 then
depesos := 1;
factor := 1000000;
millones := 1;
millon := 0;
else
if total > 999999 then
depesos := 1;
factor := 1000000;
millon := 1;
else
if total > 999 then
factor := 1000;
mil := 1;
else
factor := 1;
mil := 0;
end if;
end if;
end if;

sav := total;

total := trunc(total/factor);
sav := sav-(total*factor);
if sav = 0 then
depesos := 0;
end if;

centi:=TRUNC(total/100);

if centi = 0 then
letras := rtrim(letras)||' ';
end if;
if centi = 1 then
if total = 100 then
letras := rtrim(letras)||' CIEN';
else
letras := rtrim(letras)||' CIENTO';
end if;
end if;
if centi = 2 then
letras := rtrim(letras)||' DOSCIENTOS';
end if;
if centi = 3 then
letras := rtrim(letras)||' TRESCIENTOS';
end if;
if centi = 4 then
letras := rtrim(letras)||' CUATROCIENTOS';
end if;
if centi = 5 then
letras := rtrim(letras)||' QUINIENTOS';
end if;
if centi = 6 then
letras := rtrim(letras)||' SEISCIENTOS';
end if;
if centi = 7 then
letras := rtrim(letras)||' SETECIENTOS';
end if;
if centi = 8 then
letras := rtrim(letras)||' OCHOCIENTOS';
end if;
if centi = 9 then
letras := rtrim(letras)||' NOVECIENTOS';
end if;

total:=total - (centi*100);
deci :=trunc(total/10);
unit :=total-(deci*10);

if total >= 30 then
if deci = 3 then
letras := rtrim(letras)||' TREINTA';
end if;
if deci = 4 then
letras := rtrim(letras)||' CUARENTA';
end if;
if deci = 5 then
letras := rtrim(letras)||' CINCUENTA';
end if;
if deci = 6 then
letras := rtrim(letras)||' SESENTA';
end if;
if deci = 7 then
letras := rtrim(letras)||' SETENTA';
end if;
if deci = 8 then
letras := rtrim(letras)||' OCHENTA';
end if;
if deci = 9 then
letras := rtrim(letras)||' NOVENTA';
end if;
if unit > 0 then
letras := rtrim(letras)||' Y';
end if;
else
unit := total;
end if;

if unit = 0 then
letras := rtrim(letras)||' ';
end if;
if unit = 1 then
letras := rtrim(letras)||' UN';
end if;
if unit = 2 then
letras := rtrim(letras)||' DOS';
end if;
if unit = 3 then
letras := rtrim(letras)||' TRES';
end if;
if unit = 4 then
letras := rtrim(letras)||' CUATRO';
end if;
if unit = 5 then
letras := rtrim(letras)||' CINCO';
end if;
if unit = 6 then
letras := rtrim(letras)||' SEIS';
end if;
if unit = 7 then
letras := rtrim(letras)||' SIETE';
end if;
if unit = 8 then
letras := rtrim(letras)||' OCHO';
end if;
if unit = 9 then
letras := rtrim(letras)||' NUEVE';
end if;
if unit = 10 then
letras := rtrim(letras)||' DIEZ';
end if;
if unit = 11 then
letras := rtrim(letras)||' ONCE';
end if;
if unit = 12 then
letras := rtrim(letras)||' DOCE';
end if;
if unit = 13 then
letras := rtrim(letras)||' TRECE';
end if;
if unit = 14 then
letras := rtrim(letras)||' CATORCE';
end if;
if unit = 15 then
letras := rtrim(letras)||' QUINCE';
end if;
if unit = 16 then
letras := rtrim(letras)||' DIECISEIS';
end if;
if unit = 17 then
letras := rtrim(letras)||' DIECISIETE';
end if;
if unit = 18 then
letras := rtrim(letras)||' DIECIOCHO';
end if;
if unit = 19 then
letras := rtrim(letras)||' DIECINUEVE';
end if;
if unit = 20 then
letras := rtrim(letras)||' VEINTE';
end if;
if unit = 21 then
letras := rtrim(letras)||' VEINTIUNO';
end if;
if unit = 22 then
letras := rtrim(letras)||' VEINTIDOS';
end if;
if unit = 23 then
letras := rtrim(letras)||' VEINTITRES';
end if;
if unit = 24 then
letras := rtrim(letras)||' VEINTICUATRO';
end if;
if unit = 25 then
letras := rtrim(letras)||' VEINTICINCO';
end if;
if unit = 26 then
letras := rtrim(letras)||' VEINTISEIS';
end if;
if unit = 27 then
letras := rtrim(letras)||' VEINTISIETE';
end if;
if unit = 28 then
letras := rtrim(letras)||' VEINTIOCHO';
end if;
if unit = 29 then
letras := rtrim(letras)||' VEINTINUEVE';
end if;
if millones=1 then
letras := rtrim(letras)||' MILLONES';
millones := 0;
else
if millon=1 then
letras := rtrim(letras)||' MILLON';
millon := 0;
else
if mil=1 then
letras := rtrim(letras)||' MIL';
mil := 0;
end if;
end if;
end if;
total:=sav;
end loop;

if cent=0 then
cent1:='00';
else
cent1:=cast(cent as char(2));
end if;
if depesos=1 then
letras := rtrim(letras)||' DE PESOS '||cent1||'/100 M.C.';
else
letras := rtrim(letras)||' PESOS '||cent1||'/100 M.C.';
end if;

lletra := '('||ltrim(letras)||')';

return lletra;
end
$_$
LANGUAGE plpgsql;

Continúa...

Microsoft entrega a Samba el código de sus sistemas operativos

El gigante informático Microsoft firmó un poco común acuerdo con un grupo rival para compartir sus códigos, dando un paso para cumplir con las sanciones impuestas por la Comisión Europea por prácticas antimonopolio.

La Comisión dictaminó en 2004 que Microsoft debía ofrecer información de interconexión que permitiera que las compañías de servidores rivales pudieran operar sin problemas en los ordenadores al igual que el Windows de Microsoft.

El acuerdo, firmado en Estados Unidos por la Fundación para la Libre Información de Protocolos, estaba centrado en ayudar a Samba, una firma sin fines de lucro que fabrica programas de servidores gratuitos y de código abierto.

El software en cuestión es utilizado por pequeños grupos en oficinas para entrar en un sistema y para imprimir documentos, y es conocido como “programa de servidor de grupo de trabajo”.

La Comisión Europea resolvió en 2004 que Microsoft se había negado a ofrecer la información necesaria para interconectar información, llamada protocolos, para que los ordenadores con Windows y los servidores fabricados por sus rivales pudieran trabajar juntos.

Las prácticas anticompetitivas de Microsoft le permitieron impulsar su cuota en el mercado de los servidores, a la vez que perjudicó a las de sus rivales, quienes esencialmente abandonaron el mercado.

Microsoft se había resistido a cumplir con la sentencia hasta que el segundo mayor tribunal de la Unión Europea falló en su contra en septiembre. Como Samba no es una entidad comercial, no se vio obligada a salir del mercado y todavía seguía en pie y con la capacidad de beneficiarse de la sentencia.

La fundación pagó a Microsoft 10.000 euros, con los que obtendrá los documentos que necesita para todos lo protocolos de servidores de grupos de trabajo.

Samba debe conservar la confidencialidad de la información, pero puede y va a revelar los códigos fuente para ejecutar los protocolos

La Noticia completa aquí

Continúa...

Segundo Año con el Sr. de los Milagros de Barranco

Este es el segundo año que tengo el gusto de cargar al Señor de Los Milagros de Barranco, el año pasado tuve la suerte de que un primo me invito a cargar, el gusto de hacerlo fue muy grande, tanto que por invitación del Capataz de la 6ta Cuadrilla Sr. Roberto Tenna seguí el curso de preparación para hacerme Hermano Cargador, el curso empezó aprox. en Abril y termino en Setiembre.

Desde el pasado mes de Octubre - exactamente el día 26 de Octubre día de la juramenteación - pertenezco a la 6ta Cuadrilla, este mes de Noviembre ya voy cargando 2 veces el día jueves 1ro y Domingo 4, además de la invitación a Miraflores Sábado 3.

Hace muchos años mi padre quiso que perteneciera a la Hermandad de las Nazarenas, pero creo que no era el tiempo, no era el momento; dicen que las cosas suceden cuando deben de suceder y podría decir que es así, creo haber madurado mucho y acepto mis retos y compromisos con mas responsabilidad y seriedad, este compromiso aceptado lo hago con mucho gusto y devoción.

Continúa...

OLPC es un Juguete??

El dia de hoy he leido una entrevista de un periodista a un destacado empresario de desarrollo de Software Nacional; donde las preguntas giran en torno a la intencion de compra de 40,000 OLPC por parte del Estado Peruano.

Si bien es cierto que la persona entrevistada ha realizado importantes trabajo tambien hay que señalar que sus comentarios podrian catalogarlo como alguien que no tiene gran conocimiento por muchas cosas de las que opina, por tomar un par de ejemplo cito lo siguiente:

- La primera es que si no tiene disco duro, ¿qué medio de almacenamiento va a usar?

Desde hace buen tiempo se viene hablando de reemplazar los Discos Duros por Memorias Flash, aqui hay algunos comentarios.

- Aún no ha sido fabricado, no ha sido demostrada su eficiencia

Otro punto importante en el que debe de documentarse, ya se fabricaron equipos y han sido entregados

• El COS y OLPC, ya cuenta con dos equipos para pruebas y demos.
  
• En Uruguay entregan las primeras OLPC

- Es absolutamente imposible que un dispositivo electrónico que cuesta 100 dólares haga lo mismo que una de 800 dólares

Tendra la misma idea de un Software Antivirus que cuesta $20 comparado contra otro de $60?

Algo mas que debe de considerar es que al que denomina Juguete ya le puso la punteria el gigante del Software privativo, aqui podra leer mas de la noticia.

Para ver el Hilo de Correo de la lista de plug

Continúa...