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