- 论坛徽章:
- 0
|
求教!!!请问在unix环境下如何用perl访问oracle?
[quote]原帖由 "unix初学者"]perl和oracle都是安装在unix环境下的,怎么可以使perl访问oracle?[/quote 发表:
install DBI module,
install DBD::Oracle module,
refer to the Script below:
- #!/usr/local/bin/perl
- use DBI;
- $dbh = DBI->;connect("dbi:Oracle:tnsname", "user_name", "password") or die("DB connect error!\n");
- $sql = "select * from tab";
- $sth = $dbh->;prepare($sql);
- $sth->;execute() or die("error!");
- while(@rows = $sth->;fetchrow_array)
- {
- foreach(@rows)
- {
- print "$_\t";
- }
- print "\n";
- }
- $sth->;finish;
- $dbh ->; disconnect();
- exit 0;
复制代码 |
|