Requete sql en perl

Charliedu82 Messages postés 9 Statut Membre -  
Charliedu82 Messages postés 9 Statut Membre -
Bonjour à tous,

Toujours aussi newbie en perl, je dois, sur un fichier perl existant, inclure cette requête php.

$connect = mysql_connect(DB_SERVER, DB_SERVER_USERNAME,
DB_SERVER_PASSWORD)
or die('Impossible de se connecter : ' . mysql_error());

mysql_select_db(DB_DATABASE, $connect);

$sql = "INSERT INTO formulaire VALUES ('".$transaction_id."')";

A part l'appel au module DBI semble-t-il nécessaire, je patauge...

Est-ce qu'une âme charitable pourrait me traduire ceci ?

Merci beaucoup :-)
Configuration: Windows XP Internet Explorer 7.0

2 réponses

  1. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    Salut,

    Essaie

    use DBI;
    
    my $db      ='DB_DATABASE';
    my $host    ='DB_SERVER';
    my $user    ='DB_SERVER_USERNAME';
    my $password='DB_SERVER_PASSWORD';
    
    my $db = DBI->connect("DBI:mysql:$db:$host",
                           "$user", "$password",
                          { PrintError => 0}) || die $DBI::errstr;
    $db->do("INSERT INTO formulaire VALUES ($transaction_id)");
    

    0
  2. Charliedu82 Messages postés 9 Statut Membre
     
    Bonjour,
    Avec un peu de retard, tu m'excuses, je viens te remercier pour ton aide.

    Du coup j'ai même réussi, tout seul comme un grand, une requête Update :-)
    0