Discussion :

[calimero642]

Bonjour a tous,
apres avoir selectionne les infos avec perl je dois les rebalancer dans une base de donnees !! C est pourquoi j ai qq petite questions,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
use DBI; 
$base_nom = "mabase"; 
$base_serveur = "192.168..."; 
$base_port = "5432"; 
$base_user = "leUser"; 
$base_password = "lePassword"; 
$base_dsn = dbi:Pg:dbname=$base_nom;host=$base_serveur;port=$base_port"; 
 
my $dbh = ""; 
#on se connect à la base: 
( $dbh = DBI->connect("$base_dsn", $base_user, $base_password, { AutoCommit => 1 }) ) or die "DBI->connect ............... not ok: ", $DBI::errstr; 
 
my $curseur = $dbh->prepare("select monchamp1  from matable where valeur = ?"); 
my $mavaleur = 3; 
$curseur->execute($mavaleur); 
 
if ($dbh->errstr ne undef) {  # ERREUR EXECUTION SQL 
  print STDERR "ça a foiré"; 
  exit; 
} 
 
my $res_curseur = ""; 
$res_curseur = $curseur->fetchall_arrayref({});    
 
$curseur->finish; 
$dbh->disconnect;

C est quoi la valeur que je revois souvent mais qui n est pas commente qui est en gras : dbi:Pg:dbname
Merci Jules

[Invité]

Pg ? C'est le nom du driver DBD utilisé par DBI. En l'occurrence, là, c'est Postgresql.

Tu peux avoir Oracle (pour Oracle....), ADO (pour MSSQL, Access etc...), Mysql (pour mysql) etc etc....

[calimero642]

Oki merci
et j ai une petite question la base doit etre crée au prealable ? Ou elle se cree dynamiquement ?
Meri encore Jules

[Invité]

Elle doit être existante.