PerlでPostgreSQL

**名無しさん＠お腹いっぱい。** · 01/08/31 18:17

いままで語られてそうで意外と語られて無くない？
ドキュメントも少ないし情報交換しませんか？

**名無しさん＠お腹いっぱい。** · 01/08/31 20:24

そういえば少ないねー

**名無しさん＠お腹いっぱい。** · 01/08/31 21:39

Postgres.pm とか Pg.pm を使うと良さそう。

Pgモジュール
http://member.nifty.ne.jp/hippo2000/perltips/Pg.htm

DBD::Pgモジュール
http://member.nifty.ne.jp/hippo2000/perltips/DBD/pg.htm

Perl PostgreSQL 用関数
http://www.itboost.co.jp/perl/perl_11.php

perl スクリプトで PostgreSQL サーバにアクセスする
http://www.hpc.cs.ehime-u.ac.jp/~aman/linux/SQL/Pg.html

Pgモジュール
http://www.tale.to/tech/sh_note/12141.html

**名無しさん＠お腹いっぱい。** · 01/09/01 10:26

スピードとかサーバー負荷とかは気にならない？

**名無しさん＠お腹いっぱい。** · 01/09/01 14:02

Postgres.pm はやめませうよ（ﾜﾗ

**名無しさん＠お腹いっぱい。** · 01/09/01 17:02

めちゃめちゃ簡単じゃん（＠ｏ＠；
なんでｐｅｒｌでやってなかったんだろう

**名無しさん＠お腹いっぱい。** · 01/09/01 19:18

5に同意。
DBI+DBD::*でしょ。

**名無しさん＠お腹いっぱい。** · 01/09/03 22:32

なんでなんで？>>5、>>7

**名無しさん＠お腹いっぱい。** · 01/09/03 23:27

>>8
CPANでPostgres.pmの最終更新とか見るのが吉かと。
DBI周りの情報を集めてみるともっと吉かと。

**名無しさん＠お腹いっぱい。** · 01/09/04 12:23

Pgで使ってます。

例えばですが

$sql = "select * from table";
$result = $conn->exec($sql);

としてから必要な範囲のデータをfor等で取り出すのと
先に必要な部分を指定しておいて

$a = 4;# 必要な場所
$sql = "select * from table limit 5 offset $a";
$result = $conn->exec($sql);

とした方が負荷がかからないのでしょうか？
今のところレコード数が少ないので前者でやっております、両方比べたところ
差が感じられなかったのですが。

**名無しさん＠お腹いっぱい。** · 01/09/04 12:39

技術評論社の「シーラカンス本」のPerlのサンプルがPg.pmで載ってたから、それでそのままDBIじゃなくてPg.pmをつかっちゃってるヒトが多いです。
ちなみにあの著者、実はPerlが苦手で(改訂版で書いてる)改訂版ではPerlのサンプルが無くなってるってありさま。

苦手なら書くなよ....

**名無しさん＠お腹いっぱい。** · 01/09/04 12:53

postgres のソースに附属するのはPg.pmだから、っていう
理由もあるのでは？

**名無しさん＠お腹いっぱい。** · 01/09/04 14:37

シーラカンス本（改訂前）しかメジャーな文献はないのか？

**名無しさん＠お腹いっぱい。** · 01/09/16 16:20

pg使ってます

\copy hoge to /tmp/backup/a.dat

これをＰｅｒｌからやることってできますか？

**名無しさん＠お腹いっぱい。** · 01/09/16 17:44

モロ、無修正画像サイト発見！

http://www.sex-jp.net/dh/01/
http://www.sex-jp.net/dh/02/
http://www.sex-jp.net/dh/03/
http://www.sex-jp.net/dh/04/

**aaa** · 01/10/27 16:32

CGIでPostgreSQLとウエブ上から連携とりたいのですが、
create nobodyでユーザをつくり、GRANTで権利をあたえても
CGIうまく動作しません。
どなたか、心当たりある方いらっしゃいますか？

環境は
Debian+Apache+PostgreSQL(7.1.1)です。
Apacheはaptでもってきたものです。

**名無しさん＠お腹いっぱい。** · 01/10/30 11:07

>>16
PostgreSQL7.ほにゃらら以降から、sequence の方にも権限を
与えなければＩＮＳＥＲＴが出来ない、という現象が確認されました。
もしかしてそれかにゃ？

**名無しさん＠お腹いっぱい。** · 01/11/06 15:52

意外とＰｅｒｌで使ってる人が少ないのに驚きだなぁ
ＣＧＩに入門するときはＰｅｒｌで覚える人が多いのになぁ
やっぱしＰＨＰでやる人が多いんだろうか？

**名無しさん＠お腹いっぱい。** · 01/11/06 17:21

>>18
オレはＰｅｒｌぜよ

**名無しさん＠お腹いっぱい。** · 01/11/06 17:46

>>16
error_log見せて

**名無しさん＠お腹いっぱい。** · 01/12/03 17:46

ラージオブジェクトを使おうと思うのだが勇気のいるものなのか？
Ｐｅｒｌ関連はテキスト少なすぎ、ここを育てましょうか

**名無しさん＠お腹いっぱい。** · 01/12/03 17:58

>>21
BLOBってPostgreSQL 7.1より前だとバックアップが面倒だよね。

**名無しさん＠お腹いっぱい。** · 01/12/03 18:11

バックアップに不便だから勇気がいるって言われたのか。。。納得

**名無しさん＠お腹いっぱい。** · 01/12/21 14:24

age

**名無しさん＠お腹いっぱい。** · 01/12/22 14:59

$conn->exec("begin");
$pic = $conn->lo_open(OID, "PGRES_INV_READ");
print "$pic\n";
$conn->lo_close($pic);
$conn->exec("commit");

Ｐｇ使用
これでやったけど絵が表示できないっす。根本的に何か間違ってるっすかね？

25 · 01/12/22 18:50

自己訂正

$conn->exec("begin");
$fd = $conn->lo_open(OID, "PGRES_INV_READ");
$bite = $conn->lo_read($fd, $pic,30000);
print "$pic\n";
$conn->lo_close($fd);
$conn->exec("commit");

表示ヘッダはimage/jpegで内容も当然jpgです。
様々と試してみたのですがバイナリをそのまま文字として吐き出してる
のでしょうか？文字化けしたような文字が出てくるだけです。

**名無しさん** · 01/12/22 18:55

http://www.adultcross.com/toybox/main.html

**名無しさん＠お腹いっぱい。** · 01/12/22 21:25

>>25

print $pic;
じゃ駄目かな？？よくわからないけど。
""が怪しい

**名無しさん＠お腹いっぱい。** · 01/12/22 22:43

syswrite 使えば?

25 · 01/12/23 13:30

自己レス

$conn->exec("begin");
$fd = $conn->lo_open(OID, "PGRES_INV_READ");
$bite = $conn->lo_read($fd, $pic,30000);
binmode STDOUT;
print $pic;
$conn->lo_close($fd);
$conn->exec("commit");

としてみてもだめだね、なんだろう？
pgsql-jp MLの検索で同じようなのを見つけてその解決スクリプトみたいなのを
見てたけど基本的にはずしてないとおもうんだけど
pgsql-jp MLでもそうだったけどうちのサーバーがＲＱ３だからかな？

とりあえず>>29さんのいうようにsys関係の関数を試してみるかなぁ

25 · 01/12/23 16:01

さらに自己レス

>>30で試したものを通常のＲｅｄＨａｔ７入ったサーバーで試したら
動きました。
ＲＱ３のＰｏｓｔｇｒｅＳＱＬのバージョンの問題でしょうか？

**名無しさん＠お腹いっぱい。** · 01/12/23 16:04

>>31

ＰｏｓｔｇｒｅＳＱＬ←読みにくい。半角英数文字を使うように。

**名無しさん＠お腹いっぱい。** · 01/12/25 00:57

>>13
Linux Magazine 1月号P169にDBD:pgでの記事あり。
8ページ書いてるから初心者は役に立つかも。
Linux world 2月号P143にmod_perl+Pgでの記事あり。
5ページ書いてある。mod_perlとmod_phpの速度比較について。
現在、どちらも書店で買える。
perl+DBD:pg+postgreSQL7.1.*でSQLのリファレンスと事例サンプル付き書籍
をキボンヌ

**名無しさん＠お腹いっぱい。** · 01/12/31 05:12

age

**名無しさん＠お腹いっぱい。** · 02/01/11 17:33

$conn->exec("age");

**nobodyさん** · 02/05/27 07:10

perl

**nobodyさん** · 02/05/27 18:41

Pgは全然駄目だと思う・・・
DBI（DBD::Pg)を使ったほうがはるかにええでぇ。

**nobodyさん** · 02/05/27 18:56

>>21
DBIからlo_*()を使うのってちょっと一瞬わかりにくいよね。
pg_INV_WRITEとかの定数がデータベースハンドルからとらなきゃいけない
( $dbh->{ pg_INV_WRITE } ・・・なんでDBD::Pg::INV_WRITEとか
ないねん？？）とか、関数名が$dbh->func()の一番最後に来たり・・・

**login:Penguin** · 02/10/05 20:41

あげ

**nobodyさん** · 02/10/06 03:30

>>39
ageてくれて気づいた。こんなスレあったんだって。
新しい情報キボンヌ。

**nobodyさん** · 02/10/07 00:45

39のIDって・・・

**nobodyさん** · 02/10/07 17:22

ｺﾃﾊﾝですなぁ。unix板中心にいろんなとこで見かけますなぁ。

**nobodyさん** · 02/10/15 07:31

age

**login:Penguin** · 02/10/15 19:49

実際perl dbi + postgreSQL　で構築してある
サイト教えて下さい

**nobodyさん** · 02/10/15 21:34

関連書籍
一応，張っておく。
# みんな知ってるよね？
http://www.oreilly.co.jp/BOOK/perldbi/
PostgresというよりはDBI+DBDなんだけど，私は好きです。

**nobodyさん** · 02/10/16 00:35

>>44
http://www.magic.asuka.net/database/