NAME
MPMinus::Store::MySQL - MySQL MPMinus::Store::DBI interface
VERSION
Version 1.42
SYNOPSIS
use MPMinus::Store::MySQL;
# MySQL connect
my $mysql = new MPMinus::Store::MySQL (
-host => '192.168.1.1',
-database => 'TEST',
-user => 'login',
-pass => 'password',
-attr => {
mysql_enable_utf8 => 1,
RaiseError => 0,
PrintError => 0,
},
);
my $dbh = $mysql->connect;
my $pingstat = $mysql->ping if $mysql;
# Table select (as array)
my @result = $mysql->table($sql, @inargs);
# Table select (as hash)
my %result = $mysql->tableh($key, $sql, @inargs); # $key - primary index field name
# Record (as array)
my @result = $mysql->record($sql, @inargs);
# Record (as hash)
my %result = $mysql->recordh($sql, @inargs);
# Fiels (as scalar)
my $result = $mysql->field($sql, @inargs);
# SQL/PL-SQL
my $sth = $mysql->execute($sql, @inargs);
...
$sth->finish;
DESCRIPTION
MySQL MPMinus::Store::DBI interface
new
EXAMPLE
use MPMinus::Store::MySQL;
my $mysql = new MPMinus::Store::MySQL (
-host => '192.168.1.1',
-name => 'mylocaldb',
-user => 'root',
-password => 'password',
);
my @table = $mysql->table("select * from tablename where date = ?", "01.01.2000")
HISTORY
- 1.00 / 11.04.2007
-
Init version
- 1.10 / 26.03.2008
-
OOP style supported
- 1.20 / 01.04.2008
-
Module movied to global level
- 1.40 / 27.02.2009
-
Module movied to MPMinus level
- 1.41 / Wed Apr 24 14:53:38 2013 MSK
-
General refactoring
See CHANGES
file
DEPENDENCIES
MPMinus::Store::DBI, DBD::mysql
TO DO
See TODO
file
BUGS
* none noted
SEE ALSO
MPMinus::Store::DBI, DBD::mysql
AUTHOR
Serż Minus (Sergey Lepenkov) http://www.serzik.com <abalama@cpan.org>
COPYRIGHT
Copyright (C) 1998-2019 D&D Corporation. All Rights Reserved
LICENSE
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See LICENSE
file and https://dev.perl.org/licenses/