| DBIX :: OO dbix :: oo é um banco de dados para a abstração de objetos Perl. |
Baixe Agora |
DBIX :: OO Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Mihai Bazon
- Site do editor:
- http://search.cpan.org/~mishoo/DBIx-OO-v0.0.4/lib/DBIx/OO.pm
DBIX :: OO Tag
DBIX :: OO Descrição
DBIX :: OO é um banco de dados para a abstração de objetos Perl. Dbix :: oo é um banco de dados para objetos perl abstração.synopsis pacote mydb; usar a base 'dbix :: oo'; # Precisamos sobrescrever get_dbh, já que é uma função abstrata. # A maneira como você se conecta ao DB é realmente seu trabalho; Esta função # deve retornar o identificador de banco de dados. O padrão get_dbh () croaks. meu $ DBH; sub get_dbh {$ dbh = dbi-> connect_cached ('dbi: mysql: test', 'user', 'passwd') se! Definido $ DBH; Retornar $ DBH; } Pacote MyDB :: Usuários; Use a base 'mydb'; __Package __-> tabela ('usuários'); __Package __-> Colunas (p => , E => ); __Package __-> has_many (páginas => 'mydb :: páginas', 'usuário'); pacote mydb :: páginas; Use a base 'mydb'; __Package __-> tabela ('páginas'); __Package __-> Colunas (p => , E => ); __Package __-> HAS_A (User => 'MyDB :: Usuários'); pacote principal; Meu $ U = MYDB :: Utilizantes-> Criar ({ID => 'userid', first_name => 'q', last_name => 'w'}); Meu $ Foo = MyDB :: Utilizantes-> recuperar ('userid'); meu @p = @ {$ foo-> fk_pages}; Imprimir "Usuário:", $ foo-> first_name, "", $ foo-> last_name, "páginas: n"; foreach (@p) {imprimir $ _-> título, "n"; } $ foo-> first_name ('John'); $ foo-> last_name ('doe'); # ou $ foo-> set (first_name => 'john', last_name => 'doe'); $ foo-> atualização; Requisitos: · Perl.
DBIX :: OO Software Relacionado