Govem

Miguel Vazquez Gocobachi

¿Cómo tener autoincrement en PostgreSQL?

Este es un punto interesante, si utilizas MySQL y en cierto momento te ves obligado a usar PostgreSQL o simplemente por gusto te encontraras con algunas diferencias ligeramente importantes, una de ellas es el autoincrement que manejas en MySQL y que en PostgreSQL requieres hacer algo diferente face-smile.png

Hay dos maneras de utilizar esta funcionalidad en PostgreSQL, la primera es crear una secuencia y la tabla, y la otra es asignarle directamente el tipo al campo de la tabla. En el ejemplo la tabla se llama "foo".

1.- Creando la secuencia y la tabla

CREATE SEQUENCE foo_id_seq;
CREATE  TABLE foo (
    id integer DEFAULT  NEXTVAL('foo_id_seq')NOT  NULL,
    name character varying(8)  NOT  NULL
);
 

2.- Creando la tabla con el tipo "serial" para el campo "id".
CREATE  TABLE foo (
    id serial,
    name character varying(8)  NOT  NULL
);
 

Interesante, ¿verdad? face-smile-big.png
Miguel Vazquez Gocobachi | Octubre 2, 7:23pm | Hacks, SQL | Comentar acerca de esto

Trim en Perl


Muchas veces he utilizado la función trim() en PHP para eliminar espacios al principio y final de una linea. Esto se vuelve un problema cuando deseas hacer lo mismo en Perl, ¿por qué? Porque no existe función en perl que haga tal cosa, asi que aquí tenemos un ejemplo de como implementarlo en nuestras aplicaciones de Perl.

sub trim {
    my  $str = shift;
    $str =~ s/^\s+//;
    $str =~ s/\s+$//;
    return  $str;
}
 

Y su uso es tan simple como lo siguiente:

my  $string = trim(' Foo bar ');
 

Happy hacking!
Miguel Vazquez Gocobachi | Septiembre 19, 7:33pm | Hacks, Perl | Comentar acerca de esto

Serialización en Perl


Una de las cosas que utilizo con mayor frecuencia es la serialización de datos en PHP. Ahora, trabajando con Perl he decidido utilizar dicha funcionalidad para el almacenamiento de cierta información en un sistema Web, así que utilizando el grandioso CPAN he obtenido el módulo correspondiente.

Para poder serializar datos es necesario contar con el modulo PHP::Serialization, el cual puede ser instalado por medio del shell de perl para CPAN. A continuación, un sencillo ejemplo de su uso:

use strict;
use PHP::Serialization  qw(serialize unserialize);

my  $serialized   = serialize({a => [1,2,3], b => 5});
my  $deserialized = deserialize($serialized);

print  $deserialized->{b};
 

Su uso es muy simple, asi se que solo basta almacenar la información de $serialized en un campo text de SQL.
Miguel Vazquez Gocobachi | Septiembre 19, 12:34am | Hacks, Perl | 1 comentarios

Calendario del Blog

Octubre 2008
Dom Lun Mar Mie Jue Vie Sab
28 29 30 1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31 1
rss
atom

Amigos

Moises Briones
Julio
Dangelo