- 论坛徽章:
- 0
|
数据库服务器地址是 192.168.0.5 端口 1500
数据库名: ACXN.WORLD
数据库用户名和密码是 dataadmin 和 123456
运行出现错误提示,帮我看看代码有什么问题啊,多谢。
- #! /usr/bin/perl
- use warnings;
- use strict;
- use DBI;
- my $dbh = DBI->connect("dbi:Oracle:database='ACXN.WORLD';
- host=192.168.0.5;port=1500", 'dataadmin', '123456',
- {AutoCommit => 1});
- my $sql = 'select * from info_';
- my $sth = $dbh->prepare($sql);
- $sth->execute();
- open(SQLTEST, '>', 'sqltest') or die $!;
- while (my $row = $sth->fetchrow_arrayref) { print SQLTEST @$row }
- close SQLTEST;
- $dbh->disconnect();
复制代码
错误提示:
- DBI connect('database='ACXN.WORLD';
- host=192.168.0.5;port=1500','dataadmin',...) failed: Can't connect using this syntax without specifying a HOST and one of SID INSTANCE_NAME SERVER SERVICE_NAME at t.pl line 7
- Can't call method "prepare" on an undefined value at t.pl line 11.
复制代码
[ 本帖最后由 redspider 于 2006-10-10 22:59 编辑 ] |
|