Agrego el ejemplo de archivo de conexion a la documentacion.

diff --git a/doc/consultasDB.epl b/doc/consultasDB.epl
new file mode 100644 (file)
index 0000000..14ba87a
--- /dev/null
+++ b/doc/consultasDB.epl
@@ -0,0 +1,19 @@
+[# 
+vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 ft=perl:
+
+Este es un ejemplo del archivo que debe ir en lib_perl/consultasDB.epl
+ 
+#]
+[!
+$CLEANUP{'SAMURAI_dsn'} = 0;
+$dsn = {
+    'dns' => "dbi:mysql:dbname=normas;host=localhost",
+    'user' => "intranet",
+    'password' => "intranet"
+};
+!]
+[-
+$ret = shift;
+$ret->{SAMURAI_dsn} = $dsn;
+-]
+