SQL :: DB. Interfaccia perl per i database SQL
Scarica ora

SQL :: DB. Classifica e riepilogo

SQL :: DB. Tag

Banca dati Sql. modulo Perl perl database SQL interfaccia Perl

SQL :: DB. Descrizione

SQL :: DB è un modulo Perl che fornisce un'interfaccia di basso livello ai database SQL, utilizzando oggetti perl e operatori logici. Non è un mapper relazionale dell'oggetto come la classe :: DBI e nemmeno è un'astrazione come SQL :: Abstract. Cade da qualche parte inbetween.fter utilizzando Define_tables () per specificare il tuo schema e creare un oggetto SQL :: DB, il flusso di lavoro tipico è il seguente: * Connect () al database * Distribuisci () lo schema (creare tabelle, ecc.) * una o più "righe astratte" ottenute tramite AROW () è possibile eseguire () Inserisci, aggiornare o eliminare query. * Utilizzando una o più "righe astratte" ottenute tramite AROW () puoi recuperare () (selezionare) (e possibilmente modificare). * Ripeti i tre passaggi precedenti secondo necessità. Ulteriori query (con un livello superiore di automazione) sono possibili con gli oggetti restituiti da recupero (). * Disconnect () dal database.sql :: DB è in grado di generare quasi qualsiasi tipo di query, incluso, ma non limitato a , Iscriviti, Selezionati nidificati, sindacati, invocazioni dell'operatore lato database, chiamate di funzione, espressioni aggregate, ecc. Tuttavia questo pacchetto è ancora abbastanza nuovo e da nessuna parte vicino. I patch di feedback, test e (ancora migliori) sono tutti i benvenuti.Synopsis Utilizzare SQL :: DB QW (Define_tables Count Max); define_tables (, colonna => , Column => ,], , COLONNA => , COLONNER => , Column => , COLONN => , INDICE => 'Nome',]); My $ DB = SQL :: DB-> Nuovo (); $ DB-> Connect ('DBI: SQLITE: /TMP/SQLDBTEST.DB', 'UTENTE', 'PASS', {}); $ DB-> Distribuisci; My $ Persone = $ DB-> AROW ("persone"); i miei $ indirizzi = $ db-> arew ('indirizzi'); $ db-> fai (inserire => , valori => ,); $ db-> fai (inserire => , valori => , # PG: , dove => $ persone-> name == 'homer',); My $ ANS = $ DB-> Fetch1 (Seleziona => , da => $ persone, dove => $ persone-> età> 40,); # La seguente stampe "Conteggio della testa: 1 max Age: 43" Stampa "Conteggio della testa: '. $ ans-> conte_name. 'Max Age:'. $ ans-> max_age. "\ n"; My @Items = $ DB-> Fetch (Seleziona => , da => $ Persone, Left_Join => $ Indirizzi, On => $ Indirizzi, On => $ Indirizzi, On => $ -> ID == $ Persone-> Indirizzo, dove => ($ indirizzi-> City == 'Springfield') e ($ persone-> età> 40), order_by => $ Persone-> Age-> Desc, Limit => 10,); # Dammi "homer (43) vive a Springfield" Foreach My $ Item (@Items) {stampa $ Item-> Name, '(', $ Item-> Age, ') vive in', $ Item-> City, "\n"; } Homepage del prodotto

SQL :: DB. Software correlato