Connessione al database MySQL da uno script Perl richiede il Perl DBI e DBD : moduli MySQL . Questi moduli possono essere ottenuti da CPAN ( Comprehensive Perl Archive Network ) . Se si utilizza ActivePerl di ActiveState , è possibile scaricare i moduli con il Perl Package Manager. Il modulo DBI è utilizzato per l'accesso generale del database , mentre il DBD : modulo MySQL è utilizzato per accedere al database MySQL . Collegamento e query

Per utilizzare il DBI : modulo MySQL per accedere al database MySQL , è necessario aggiungere la riga "use DBI ; " per la sceneggiatura che racconta Perl per usare le librerie DBI . Questa linea deve essere inserito prima di ogni accesso al database è tentato. Si connette al database con il " > DBI -connect ( ' dbi : database: mysql ', ' username' , 'password' ) " la funzione . Istruzioni SQL possono essere preparati per l'esecuzione con il " prepare ( ) la funzione " ed eseguito con la funzione di "eseguire" . I risultati sono poi reinserito in un array che può essere stampato o successivamente trattati

Uno script di esempio sarà simile : .

# ! /usr /bin /perl- w # Pubblica il DBI libraryuse DBI ; # Creare le variabili per le informazioni del database $ database = " esempio " , $ username = " mysql " ; $ password = " pass" ; # connessione al database $ connessione = dBI - > connect ( ' dbi : mysql : $ database' , $ username ' , $ password ' ) or die "Errore di connessione : $ dBI :: errstr \\ n"; # ​​Fornire la query $ istruzione = " SELECT * FROM indirizzo " ; # eseguire la query $ eseguire = $ connect - > prepare ( $ statement) ; $ execute- > executeor die" Errore: $ DBI :: errstr \\ n "; # Ritorna la resultswhile ( @ row = $ eseguire - > fetchrow_array ) { print " @ riga \\ n"; } $ connect - > disconnect ();

La linea " $ connect = dBI - > connect ( ' dbi : mysql : $ database' , $ username ' , $ password ' ) or die "Errore di connessione : $ DBI :: errstr \\ n"; "viene utilizzato per la connessione al database , ma fornisce anche il controllo degli errori in modo che lo script non continui a girare se non connessione. Il controllo degli errori è anche incluso l'esecuzione della query.

La funzione " fetchrow_array " restituisce ogni riga come un array di valori . I valori sono accessibili separatamente con le variabili $ riga [ 1 ] , $ riga [ 2 ] , $ riga [ 3 ] , ecc In questo esempio , l'intera riga sia stampata l'ultima riga screen.The dello script rimuove . della connessione al database

Se si desidera creare una tabella , o inserire dati in una tabella , è necessario utilizzare il fare () la funzione " per creare la tabella la sintassi sarà: . $ connect - > do ( " Creazione di testo Table ( id INT , nome VARCHAR ( 20 ) )"); .

per inserire i dati nella tabella è necessario aggiungere la funzione quote () , per citare i valori di stringa $ connect - > do ( "INSERT INTO valori di testo ( 1 , " $ connect - > citazione ( " James" )) " . . ) ;
System Administration

il modulo DBI permette alle funzioni di amministrazione del sistema , quali la creazione , l'eliminazione e la chiusura del database

per creare un nuovo database si dovrebbe rilasciare la seguente riga : . $ newdb = $ ​​connect - > func ( " createDB " , $ database , 'admin ');

Per eliminare un database si rilascia la linea : $ delete = $ connect - > func ( " dropdb " , $ database , 'admin '); < br >

Per arrestare il database si dovrebbe rilasciare la linea : $ delete = $ connect - > func ( "shutdown " , $ database , 'admin ');
< br >