CREATE TABLE property (
key TEXT PRIMARY KEY,
value TEXT,
show BOOLEAN NOT NULL DEFAULT False,
inserted TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT CURRENT_TIMESTAMP,
updated TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT CURRENT_TIMESTAMP
);
tie %$h,
'Tie::DBI',
'dbi:Pg:dbname=test;user=test',
'property',
'key',
{ CLOBBER => 2 };