$ perl main.pl 
enter pg pass: 
foo (7/2006-11-20)
DBD::Pg::st execute failed: called with 1 bind variables when 2 are needed [for Statement "SELECT param2, name, param1, description, param4, param5, data2, id, param3
FROM   ppo_data
WHERE  id_attached=? AND date=?
" with ParamValues: 1=undef, 2=undef] at /usr/share/perl5/DBIx/ContextualFetch.pm line 52, <STDIN> line 1.