DBI没有execute方法？

pingshx

代码如下：

use DBI;
use DBD::Oracle ;
$dbh = DBI->;connect(
                         "dbi:Oracle:host=172.17.0.101;sid=ora",
                         "scott",
                         "tiger"                        
                       ) or die " can not connect to the database";
$dbh->;prepare("select * from test_0";
$dbh->;execute();
@count=$dbh->;fetchrow_array();
print"the record:\n";
print"@count\n";
$dbh->;execute;
$dbh->;close();
print "ok";



D:\>;perl oracle.pl
Can't locate object method "execute" via package "DBI::db" at oracle.pl line 9.


先谢过大家！

gangjh

# Start statement
my $sth = $dbh->;prepare( <<SQL_END );
        SELECT TABLE_NAME
        FROM ALL_TABLES
        WHERE owner =( ? )
SQL_END
$sth->;execute('BACK' );





my $stmt = "select table_name,tablespace_name  from user_tables order by 2 ,1 ";
my $sth = $dbh->;prepare( $stmt );

pingshx

搞定，谢谢gangjh,
同时想问一下，有没有这方面dbi的资料？特别操作oracle的。

gangjh

我的手册是man
man DBD::Oracle

yyyzzy

嘿嘿，偷学

pingshx

hi,gangjh,你说的，man DBD::Oracle是不是安装DBD：：Oracle模块时，自带的？？Perl安装在xp上，在html目录下没有这方面的操作说明呀，我是用ppm安装DBD::Oracle的。
在linux/unix有这方面的操作说明？

gangjh

原帖由 "pingshx" 发表：
hi,gangjh,你说的，man DBD::Oracle是不是安装DBD：：Oracle模块时，自带的？？Perl安装在xp上，在html目录下没有这方面的操作说明呀，我是用ppm安装DBD::Oracle的。
在linux/unix有这方面的操作说明？

DBD::Oracle是在http://search.cpan.org 下載的
操作系統是Debian Linux

附檔是
man DBD::Oracle |col -b |vim -
TOhtml
轉換而來的

pingshx

下载了，谢谢gangjh.

hh123456

Windows 下也有，
perldoc DBD::Oracle
就行