morissardj's Home Page
Home
Perl
Perl
-
Ajouter des donnees dans une table
Add_table.pl
#!/usr/bin/perl -w #!/usr/bin/perl use DBI; $database='GENES'; $hostname='localhost'; $mysqluser='root'; $mysqlpass=''; $dbh=DBI->connect("DBI:mysql:$database:$hostname",$mysqluser,$mysqlpass)or die "Echec de la connexion\n"; $table="nom_de_la_table"; $sth=$dbh->prepare(" UPDATE TABLE $table(attribut1,attribut2) SET VALUES(1,2) ); "); $sth->execute; $sth->finish; $dbh->disconnect;