PERL與MySQL（三、DBI接口）

- 中國WEB開發者網絡 (http://www.webasp.net)
-- 技術教程 (http://www.webasp.net/article/)
--- PERL與MySQL（三、DBI接口） (http://www.webasp.net/article/8/7753.htm)

-- 作者：未知
-- 發佈日期： 2003-09-13

通用DBI方法
<TABLE border=1 cellSpacing=1 width=624>
 <TBODY>
 <TR>
 <TD vAlign=center>
 connect </TD>
 <TD vAlign=center>
 建立與一個數據庫服務器的連接</TD></TR>
 <TR>
 <TD vAlign=center>
 prepare </TD>
 <TD vAlign=center>
 獲取準備執行的SQL語句</TD></TR>
 <TR>
 <TD vAlign=center>
 do </TD>
 <TD vAlign=center>
 準備並執行一個SQL語句</TD></TR>
 <TR>
 <TD vAlign=center>
 disconnect </TD>
 <TD vAlign=center>
 斷開與一個數據庫服務器的連接</TD></TR>
 <TR>
 <TD vAlign=center>
 quote </TD>
 <TD vAlign=center>
 被插入引用字符串（塊）</TD></TR>
 <TR>
 <TD vAlign=center>
 execute </TD>
 <TD vAlign=center>
 執行存儲過程</TD></TR>
 <TR>
 <TD vAlign=center>
 fetchrow_array </TD>
 <TD vAlign=center>
 取出下一行到一個數組之中</TD></TR>
 <TR>
 <TD vAlign=center>
 fetchrow_arrayref </TD>
 <TD vAlign=center>
 取出下一行到數組中，返回數組的引用</TD></TR>
 <TR>
 <TD vAlign=center>
 fetchrow_hashref </TD>
 <TD vAlign=center>
 取出下一行到哈希表，返回其引用</TD></TR>
 <TR>
 <TD vAlign=center>
 fetchall_arrayref </TD>
 <TD vAlign=center>
 取出所有的數據到一個數組，返回其引用。</TD></TR>
 <TR>
 <TD vAlign=center>
 finish </TD>
 <TD vAlign=center>
 結束語句、釋放系統資源</TD></TR>
 <TR>
 <TD vAlign=center>
 rows </TD>
 <TD vAlign=center>
 返回作用的行的數目</TD></TR>
 <TR>
 <TD vAlign=center>
 data_sources </TD>
 <TD vAlign=center>
 返回本機中可用的數據庫的數組。</TD></TR>
 <TR>
 <TD vAlign=center>
 ChopBlanks </TD>
 <TD vAlign=center>
 去除空格 </TD></TR>
 <TR>
 <TD vAlign=center>
 NUM_OF_PARAMS </TD>
 <TD vAlign=center>
 存儲過程中佔位符的數目</TD></TR>
 <TR>
 <TD vAlign=center>
 NULLABLE </TD>
 <TD vAlign=center>
 哪一個行允許Null。</TD></TR></TBODY></TABLE>
MySQL 的特殊方法
<TABLE border=1 cellSpacing=1 width=624>
 <TBODY>
 <TR>
 <TD vAlign=center>
 insertid </TD>
 <TD vAlign=center>
 最後自動遞增的值</TD></TR>
 <TR>
 <TD vAlign=center>
 is_blob </TD>
 <TD vAlign=center>
 為BLOB的行</TD></TR>
 <TR>
 <TD vAlign=center>
 is_key </TD>
 <TD vAlign=center>
 為鍵的行</TD></TR>
 <TR>
 <TD vAlign=center>
 is_num </TD>
 <TD vAlign=center>
 為數字的行</TD></TR>
 <TR>
 <TD vAlign=center>
 is_pri_key </TD>
 <TD vAlign=center>
 為主鍵的行</TD></TR>
 <TR>
 <TD vAlign=center>
 is_not_null </TD>
 <TD vAlign=center>
 不能為NULL的行</TD></TR>
 <TR>
 <TD vAlign=center>
 length </TD>
 <TD vAlign=center>
 理論上最大的列的數目</TD></TR>
 <TR>
 <TD vAlign=center>
 max_length </TD>
 <TD vAlign=center>
 物理上最大的列的數目</TD></TR>
 <TR>
 <TD vAlign=center>
 NAME </TD>
 <TD vAlign=center>
 列名</TD></TR>
 <TR>
 <TD vAlign=center>
 NUM_OF_FIELDS </TD>
 <TD vAlign=center>
 返回的字段的數目</TD></TR>
 <TR>
 <TD vAlign=center>
 table </TD>
 <TD vAlign=center>
 返回的集中的表的名稱</TD></TR>
 <TR>
 <TD vAlign=center>
 type </TD>
 <TD vAlign=center>
 行的類型</TD></TR>
 <TR>
 <TD vAlign=center>
 _CreateDB </TD>
 <TD vAlign=center>
 創建一個數據庫</TD></TR>
 <TR>
 <TD vAlign=center>
 _DropDB </TD>
 <TD vAlign=center>
 刪除一個數據庫</TD></TR></TBODY></TABLE>
connect
建立與一個數據庫服務器的連接

prepare
獲取準備執行的SQL語句

do
準備並執行一個SQL語句

disconnect
斷開與一個數據庫服務器的連接

quote
被插入引用字符串（塊）

execute
執行存儲過程

fetchrow_array
取出下一行到一個數組之中

fetchrow_arrayref
取出下一行到數組中，返回數組的引用

fetchrow_hashref
取出下一行到哈希表，返回其引用

fetchall_arrayref
取出所有的數據到一個數組，返回其引用。

finish
結束語句、釋放系統資源

rows
返回作用的行的數目

data_sources
返回本機中可用的數據庫的數組。

ChopBlanks
去除空格

NUM_OF_PARAMS
存儲過程中佔位符的數目

NULLABLE
哪一個行允許Null。

MySQL 的特殊方法

insertid
最後自動遞增的值

is_blob
為BLOB的行

is_key
為鍵的行

is_num
為數字的行

is_pri_key
為主鍵的行

is_not_null
不能為NULL的行

length
理論上最大的列的數目

max_length
物理上最大的列的數目

NAME
列名

NUM_OF_FIELDS
返回的字段的數目

table
返回的集中的表的名稱

type
行的類型

_CreateDB
創建一個數據庫

_DropDB
刪除一個數據庫

　
connect：
使用connect方法建立一個到數據源的連接。$data_source應該以DBI:driver_name:開始，例如：

$dbh = DBI->connect("DBI:mysql:$database", $user, $password);
$dbh = DBI->connect("DBI:mysql:$database:$hostname",
 $user, $password);
$dbh = DBI->connect("DBI:mysql:$database:$hostname:$port",
 $user, $password);
如果用戶名或者是口令沒有定義的話，那麼DBI將使用DBI_USER，DBI_PASS環境變量分別作為其值。如果你沒有定義主機的話，那麼默認的是「localhost」，如果你沒有定義端口號的話，以默認的mysql的端口號（3306）作為端口號。
　
prepare：
通過數據庫引擎預備SQL語句並且返回一個語句句柄($sth)用於參與execute方法，例如：

$sth = $dbh->prepare($statement) or die "Can't prepare $statement:
$dbh->errstr\n";
do
do方法預備並執行一個SQL語句，返回作用的行的數目，這個方法通常用於非select的語句，同時一般不需要執行多次（例如：insert，delete等）。例如：

$rc = $dbh->do($statement) or
 die "Can't execute $statement: $dbh- >errstr\n";
disconnect
disconnect將斷開與數據庫的連接，通常在程序結束的時候使用。例如：

$rc = $dbh->disconnect;
quote
quote方法用於 "escape"任何在字符串中的特定自負，並且加上引用標記。

$sql = $dbh->quote($string)
execute
該方法執行一個存儲的語句。對於非select的語句來說，它返回作用的行的數目，對於select語句來說，該方法僅僅是開始了在數據庫中查詢，你需要fetch_*方法來取回數據。

$rv = $sth->execute or die "can't execute the query: $sth->errstr;
fetchrow_array
這個方法取回下一行的數據，並且將其存儲在一個數組之中。例如：

while(@row = $sth->fetchrow_array) {
 print qw($row[0]\t$row[1]\t$row[2]\n);
}
fetchrow_arrayref
這個方法取回下一行的數據，並將其返回在一個對數組的引用之中。例如：

while($row_ref = $sth->fetchrow_arrayref) {
 print qw($row_ref->[0]\t$row_ref->[1]\t$row_ref->[2]\n);
}
fetchrow_hashref
這個方法取回一行數據，並且返回一個到包含了字段名/值的哈希表的引用。這個方法不如使用一個數組引用的方法有效率。例如：

while($hash_ref = $sth->fetchrow_hashref) {
 print qw($hash_ref->{firstname}\t$hash_ref->{lastname}\t\
 $hash_ref- > title}\n);
}
fetchall_arrayref
這個方法被用來從一個SQL語句的執行結果中取回所有的數據（行）。它返回一個數組的引用，你可以通過一個循環來打印/顯示這些數據。

my $table = $sth->fetchall_arrayref or die "$sth->errstr\n";
my($i, $j);
for $i ( 0 .. $#{$table} ) {
 for $j ( 0 .. $#{$table->[$i]} ) {
 print "$table->[$i][$j]\t";
 }
 print "\n";
}
finish
指示沒有更多的數據可以被取出，你可以通過這個方法釋放語句句柄，並且釋放系統資源。例如：
$rc = $sth->finish;
rows
返回在（updated，delete等）操作中作用的行的數目。這通常被用在do（）或者非select的execute（）語句之後。例如：

$rv = $sth->rows;
NULLABLE
返回一個數組的引用，TRUE分別表示這個列可以允許NULL。

$null_possible = $sth->{NULLABLE};
NUM_OF_FIELDS
通過SELECT或者LISTFILEDS語句返回的列的數目。如果數目為0表示一個非SELECT語句的執行，例如，INSERT，DELETE或者UPDATE等。

$nr_of_fields = $sth->{NUM_OF_FIELDS};
data_sources
這個方法返回在localhost中的mysql服務中可用的數據庫的數組。

@dbs = DBI->data_sources("mysql");
ChopBlanks
這個方法決定了返回的行中是否去除空格。

$sth->{'ChopBlanks') =1;

<MySQL 特定方法>

insertid
如果你使用了mysql的自動增值的特性，那麼最新的自動增值將被存儲。例如：

$new_id = $sth->{insertid};
is_blob
返回一個數組的引用，TRUE分別表示所指示的列是BLOB。

$keys = $sth->{is_blob};
is_key
返回一個數組的引用，TRUE分別表示所指示的列是KEY。

$keys = $sth->{is_key};
is_num
返回一個數組的引用，TRUE分別表示所指示的列包含了數字。

$nums = $sth->{is_num};
is_pri_key
返回一個數組的引用，TRUE分別表示所指示的列是一個主鍵。

$pri_keys = $sth->{is_pri_key};
is_not_null
返回一個數組的引用，FALSE表示這個列可以包含NULL，而你最好使用DBI標準中的NULLABLE屬性。

$not_nulls = $sth->{is_not_null};
max_length、length
返回一個指示最大列的尺寸的數組的引用。最大長度是指在結果的表中的最大數值，LENGTH給出了理論上的最大值。

$max_lengts = $sth->{max_length};
$lengts = $sth->{length};
NAME
返回一個列名稱的數組的引用。

$names = $sth->{NAME};
table
返回了表名稱的數組的引用。

$tables = $sth->{table};

webasp.net