[B! Perl][postgresql] nsyeeのブックマーク

Call PostgreSQL functions via HTTP JSON-RPC

Everytime I deploy a new stored procedure, it bothers me I have to update the middle-layer to allow my front-end code to use the function. My middle-layer between the front-end code and the database simply translates JSON-RPC requests to SELECT queries calling stored procedures returning JSON back to the front-end. This is almost perfect. But, I still have to update a file where I keep all queries

nsyee 2012/06/04

リンク

MySQL と SQLite に対応した DBIx なモジュールを PostgreSQL に対応させる Tips いくつか - Articles Advent Calendar 2010 Casual

こんにちは。PostgreSQL をよく使っている id:sfujiwara (@fujiwara) です。世間では MySQL のほうが PostgreSQL より人気のようですね (特に Web 業界では)。なので、DBIx な便利なモジュールも開発当初は MySQL と SQLite でしか動かなかったりして悲しい思いをすることがあり、こちゃこちゃ patch を書いたりしておりました。そこで溜まったいくつかの Tips をここで公開したいと思います。 1. auto increment の扱いまず、いわゆる自動発番なカラムの扱いについて。MySQL ではカラム定義で AUTO_INCREMENT 指定、SQLite では最初のカラムの型を INTEGER にして PRIMARY KEY 指定、でできるやつですね。PostgreSQL では SERIAL 型を使用して定義します

nsyee 2010/12/31

リンク

Kazuho@Cybozu Labs: Perl のテスト用に PostgreSQL のインスタンスを自動で構築するモジュール Test::postgresql を書いた

以前作成した Test::mysqld (参照:Perl のテスト用に MySQL 環境を自動で構築するモジュール Test::mysqld を書いた) の姉妹版、Test::postgresql を書きました。このモジュールを使えば、テストコード内で一時的にテスト専用の PostgreSQL のインスタンスを構築し、テストを実行することができます。構築されたインスタンスは、テスト終了時に自動的に削除されます。 use DBI; use Test::postgresql; use Test::More; my $pgsql = Test::postgresql->new( init db_args => $Test::postgresql::Defaults{init db_args} . ' --encoding=utf8', ) or plan skip_all => $Test::pos

nsyee 2009/08/19

リンク

PostgreSQL の dump をテーブルごとに分割する pg_dump_splitter.pl - 酒日記はてな支店

pg_dump で (-t オプションなしで) 出力したファイルは、すべてのテーブルのデータが一緒になっているわけです。が、バックアップが必要な時って「データベース全体を復旧したい」だけではなくて、「このテーブルのデータ間違って消しちゃった(updateしちゃった)から戻したい!」みたいなことが多々ある。ダンプが大きくなると、エディタで開いて探してコピペして……みたいなこともできなくて困る。てことで、結構前に書いたのを晒します。 Coderepos に上げてあります。http://coderepos.org/share/browser/lang/perl/misc/pg_dump_splitter/pg_dump_splitter.pl pg_dump_splitter.pl [-t tablename] [-i input_encoding] [-o output_encoding]

nsyee 2009/07/18

リンク

Queue::Q4Pg::Lite を書いた - 酒日記はてな支店

PostgreSQL で簡易に MQ - Mi manca qualche giovedi`? を読んで、こりゃ素晴らしいと思ったので Perl モジュール化しました。 simple message queue using PostgreSQL. http://github.com/fujiwara/perl-queue-q4pg-lite/tree/master 割と簡易な Message Queue ということで、Lite って名前に。pg_advisory_lock() を使用してるので、PostgreSQL-8.2 以降でないと動きません。インターフェースは Queue::Q4M とほとんど同じ……というか、コード自体を半分ぐらい Queue::Q4M から頂いています。 use Queue::Q4Pg::Lite; my $q = Queue::Q4Pg::Lite->conn

nsyee 2009/05/07

リンク

TheSchwartz を PostgreSQL / SQLite で使うと worker プロセスが太る(のは解決済) - 酒日記はてな支店

MySQLだと問題ないみたい。あと、job の引数に何を渡すかで変わってくるらしい…… [2010-2-16 追記] 追記時点での DBD::Pg と DBD::SQLite の最新版 (DBD::Pg-2.16.1, DBD::SQLite-1.29) では、以下に記述されているメモリリークは解消されています。記事自体は記録の意味も兼ねているので消さずに残しますが、ご注意ください。ちなみに SQLite 用のスキーマは TheSchwartz 自身に同梱されていて t/schema-sqlite.sql に、PostgreSQL 用のはリポジトリの trunk にあります。doc/schema-postgres.sql 検証用のスクリプトは最後に載せますが、単に client が job を突っ込んで、worker が job を取り出して $job->completed() するだけ