Perlで、DBIモジュールを使って、データベースをアクセスするサンプルプログラムです。 データベースは、PostgreSQLを使っています。 カーソルでデータを全件検索する方法 カーソルを使って、SQL文の結果を1件ずつ処理するサンプルです。 #!/usr/local/bin/perl use strict; use DBI; my ($dbh, $sth); my ($data_source, $user_name, $sql); my ($id, $name, $zip, $addr, $tel); $data_source = 'dbi:Pg:dbname=addr'; $user_name = 'joe'; $dbh = DBI->connect($data_source, $user_name) || die $dbh->errstr; $sql = 'select * fro