Bonjour a tous,
j ai un peiti probleme d import dana la base de donnée.
J ai programmer pour importer un fichier csv de donnée dans la table d une base de données. Mais le soucy c est qu il me rempli rien alors que le fichier me parait rempli. Comment puis faire pour verifier qu il est bien fermé !!!!!
j ai un close mais j ai doute car si je lance la fonction a part c est a dire sans effectuer un import a partir du programme principal la base de remplie. J ai l impression que le fichier n est pas fermé !
Merci D avance Jules
voila mon prog d import :
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 #!/usr/bin/perl use strict; use DBI; package sous_fonc_import_base_partie_2 ; #Module base de donnees sub Fonct_Import_Data_partie_2 { print"\nTOTO\n"; my $dbh = DBI->connect("DBI:mysql:Outils_LAN","jules_rtp","jules") || die "Echec de la connection"; #my $variable_ma_base de_donnees = #DBI->connect=connexion a la database #("DBI:mysql:switch_sxb"=nom de la database,"jules"=user,"jules"=password) || die "Echec de la connection"; $dbh->do("DELETE FROM IP_MAC_Cross_Over"); #Ici on specifie la table $dbh->do("LOAD DATA LOCAL INFILE '/home/rappju/projet_2/FINAL.csv' REPLACE INTO TABLE IP_MAC_Cross_Over FIELDS TERMINATED BY ';'"); $dbh->disconnect; } 1; #&Fonct_Import_Data_partie_2
Partager