Perl e DBI: il primo script con MySql
In questo articolo vedremo di capire insieme come utilizzare i db MySql con Perl.
E' opportuno premettere fin da subito che per svolgere questo compito Perl ha bisogno del driver DBI (Database Interface), ovvero di una libreria che consente al liguaggio di interfacciarsi al nostro database.
Non solo, abbiamo bisogno anche del modulo DBD di MySql, ovvero dell'interfaccia comunicativa del nostro db.
Prima di procedere è peranto opportuno verificare la presenza sul nostro server di DBI e DBD.
Se i due driver sono presenti possiamo continuare. In caso contrario, prima di procedere, sarà necessario installarli entrambi.
Ecco un piccolo scriptino perl che sfrutta (appunto) questi driver per inserire dati nel nostro db MySql.
Il codice:
#!/usr/bin/perl -wuse DBI;
(L'articolo continua più sotto...)#dati di accesso al db MySql
$database = "nomedb"; $user = "root"; $pass = "secret"; $driver = "DBI:mysql";#connessione al db
my $dbh = "DBI ->connect($driver:database=$database, $user, $pass)
or die "Non posso connettermi!";#Inseriamo alcuni dati nel DB
$dbh->do("INSERT INTO Tabella (Campo1, Campo2) VALUES ('pippo','pluto')");#Disconnessione dal db
$dbh->disconnect;exit;
