|
メモ
この手順は、Pervasive PSQL v11 SP1、Perl および ODBC ディストリビューションがインストールされていることを前提にしています。http://www.iODBC.org で ODBC のフリー バージョンを入手することができます。Perl については http://www.perl.org をご覧ください。
Pervasive PSQL を Perl の ODBC インターフェイスで動作させるには
print "using odbc...¥n"; use DBI; $dbName = "DBI:ODBC:DEMODATA"; $dbUserName = ""; $dbPassword = ""; print "connecting...¥n"; $sql = "SELECT * FROM class"; $dbh = DBI->connect($dbName, $dbUserName, $dbPassword); $dataObject = $dbh->prepare($sql); $dataObject->execute(); while(@row=$dataObject->fetchrow_array) { print "$row[0]¥t$row[1]¥t$row[2]¥n¥n" }
|