YAPC::Asiaの前にDBIx::DSN::Resolverってのを書いてリリースしていますが、実際のWebアプリケーションで使うにはキャッシュやDNSRR対応などアプリケーション側でコードを書く必要があって面倒なので、簡単に使えるようラッパーとなるモジュールを書いてリリースしました。 https://metacpan.org/module/DBIx::DSN::Resolver::Cached DBIx::DSN::Resolver::Cached を使うことでDNSに掛かる負荷を押さえつつ簡単に負荷分散もできます。 use 5.10.0; use DBIx::DSN::Resolver::Cached; sub connect_db { state $r = DBIx::DSN::Resolver::Cached->new( ttl => 30, negative_ttl => 1