| Perl連接Oracle數據庫 | |
| http://www.51cto.com 2005-09-09 11:48 http://beta.xmu.cn/ | |
| 上次講了在linux下安裝Oracle，安裝完之后可以用netac來(lái)配置遠程數據庫的本地命名。 要在perl下面連接oracle數據庫，首先必須安裝DBI和DBD for Oracle。 下面是一段perl程序 #!/usr/bin/perl use DBI; $dbname="oralce"; $user="user"; $passwd="password"; $dbh=""; $dbh = DBI->connect("dbi:Oracle:$dbname",$user,$passwd) or die "can‘t connect to database ". DBI-errstr; //連接數據庫 $sth=$dbh->prepare("select * from tDevice"); $sth->execute; //執行sql語(yǔ)句 while (@recs=$sth->fetchrow_array) { rint $recs[0].":".$recs[1].":".$recs[2]."\n"; //讀取記錄數據 } $dbh->disconnect; //斷開(kāi)連接 | |
聯(lián)系客服
