Ok ya puedo contactarme con la base de datos.. así.
Using perl Syntax Highlighting
package ConectarDB
;
use strict
;
use DBI
;
#------------------------------
my $db_user = "XXX";
my $db_pass = "Uno por_hay";
my $host_name = "localhost";
my $db_name = "dnet";
#------------------------------
my $q_string = "DBI:Oracle:host=$host_name;database=$db_name";
sub connect
{
return (DBI
->connect ($q_string, $db_user, $db_pass,
{PrintError
=> 0
, RaiseError
=> 1
}));
}
1;Coloreado en 0.005 segundos, usando
GeSHi 1.0.8.4
A hora bien necesito hacer un query, y pasarlo a un archivo TXT..
Lo que no comprendo bien es cómo se logra la lectura de estas tablas. En el tutorial se pone el siguiente ejemplo:
Using perl Syntax Highlighting
1
: my($dbh,$sth);
2
: $dbh = ConectarDB
->connect();
3
: $sth = $dbh->prepare('SELECT fecha FROM table WHERE nombre = ? AND apellido = ?') or die("Couldn't prepare statement: " . $dbh->errstr);
4
: $sth->execute("Uriel","Lizama") or die("Couldn't execute statement: " . $sth->errstr);
5
: my $fecha = $sth->fetchrow_array();
6
: $sth->finish;
7
: $dbh->disconnect;Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
Pero no entiendo bien esto. ¿Cuál es la estructura?
¿Se supone que la línea 3 prepara la lectura de las tablas donde se encuentra la palabra nombre y apellido?
¿Y si es así busca Uriel y lizama?
No entiendo esto, ¿cómo podría yo sacar toda la info?
Por cierto si ejecuto este programa resulta el siguiente error:
- Código: Seleccionar todo
Can't connect to data source dbi:Oraclednet, no database driver specified and DBI_DSN env var not set at ConectarDB.pm line 16
espero ganarme mi playera, o mi tacita conmemorativa, jajajajaja. Un saludo.