DBD :: MySQLPP. dbd :: mysqlpp é um driver Pure Perl MySQL para o DBI.
Baixe Agora

DBD :: MySQLPP. Classificação e resumo

DBD :: MySQLPP. Tag

Módulo Perl. Mysql. motorista Motorista MySQL. Driver DBI DBI

DBD :: MySQLPP. Descrição

DBD :: MySQLPP é um driver Pure Perl MySQL para o DBI. DBD :: MySQLPP é um driver Pure Perl MySQL para o DBI.SYNOPSIS Use DBI; $ dsn = "dbi: mysqlpp: banco de dados = $ banco de dados; host = $ hostname"; $ dbh = dbi-> conectar ($ DSN, $ user, $ senha); $ DRH = dbi-> install_driver ("mysqlpp"); $ sth = $ dbh-> Preparar ("SELECT * de foo onde Bla"); $ sth-> executar; $ numrows = $ sth-> linhas; $ numfields = $ sth -> {'num_of_fields'}; $ sth-> acabamento; exemplo #! / usr / bin / perl Use rigoroso; Use o DBI; # Conectar ao banco de dados. Meu $ DBH = DBI-> Connect ("DBI: MySQLPP: banco de dados = teste; host = localhost", "Joe", "Password de Joe", {'raisError' => 1}); # Drop Table 'foo'. Isso pode falhar, se "foo" não existir. # Assim, colocamos uma eval em torno dele. eval {$ dbh-> do ("Drop Table Foo")}; Imprimir "Dropping Foo Falha: $ @ N" Se $ @; # Crie uma nova mesa 'foo'. Isso não deve falhar, portanto, não estamos apenas erros. $ dbh-> Do ("Criar tabela foo (id integer, nome varchar (20))"); # Insira alguns dados em "foo". Estamos usando $ dbh-> citação () para # citando o nome. $ dbh-> Do ("inserir em valores foo (1,". $ dbh-> citação ("tim") ")"); # Mesma coisa, mas usando espaços reservados $ dbh-> Do ("inserir em valores foo (? ,?)", Redef, 2, "jochen"); # Agora recupere dados da tabela. Meu $ sth = $ dbh-> Preparar ("Selecionar ID, nome de foo"); $ sth-> Execute (); while (my $ ref = $ sth-> fetchrow_arrayref ()) {print "encontrou uma linha: ID = $ ref -> , nome = $ ref -> n"; } $ sth-> Acabamento (); # Desconecte do banco de dados. $ dbh-> Desconectar (); Requisitos: · Perl.

DBD :: MySQLPP. Software Relacionado