pl@nereida:/tmp$ diff Prueba3.pm Prueba.pm
9d8
< #sub _DBLoad {
pl@nereida:/tmp$ perl -c Prueba.pm
Prueba.pm syntax OK