clubber43 | Bonjour à tous,
Je reviens sur le forum car j'ai avancé un projet d'export en PERL
http://forum.hardware.fr/hfr/Progr [...] 1327_5.htm
Et aujourd'hui, je commence à etudier de pret les bases de données.
Je souhaite y sauvegarder mes données extraites depuis le script en PERL et aussi je souhaite y avoir acces.
Je penche pou l'utilisation de BDD en MySql et toujours avec le PERL.
Ma question, est de savoir si je peux incrémenter ma BDD directement avec le script d'export, et si je peux créer des
Requetes automatiques qui vont chercher les valeurs.
J'ai deja commencé à regarder un peu partout, et j'ai trouvé ces lignes de codes,
Code :
- #!/usr/bin/perl
- use warnings;
- use strict;
- use Encode;
- use DBI;
- # Paramètres de connection à la base de données
- my $bd = 'Energie';
- my $serveur = '127.0.0.1'; # @ IP IP
- my $identifiant = 'root'; # identifiant
- my $motdepasse = 'admin';
- my $port = '3306'; #Si vous ne savez pas, ne rien mettre
- # Connection à la base de données mysql
- print "Connexion a la base de donnees $bd\n";
- my $dbh = DBI->connect( "DBI:mysql:database=$bd;host=$serveur;port=$port",
- $identifiant, $motdepasse, {
- RaiseError => 1,
- }
- ) or die "Connection impossible a la base de donnees $bd !\n $! \n $@\n$DBI::errstr";
|
ou encore,
Code :
- # Insertion des données
- my $requete_sql_compteur = <<"SQL";
- INSERT INTO rcompteur ( id_compteur, emplacement, batiment, niveau,adresse_IP)
- VALUES ( 1, TDD1, D, 1,172.17.14.3);
- SQL
- # Deconnection de la base de donnees
- $dbh->disconnect();
|
pour ajouter des valeurs.
Ensuite, si une autre personne souhaite visualiser les valeurs de la BDD, doitil avoir un acces à la fenetre de commande PERL ?
Merci pour le coup de main.
@+ |
