#!/usr/bin/env perl use strict; use warnings; use lib '/usr/share/perl/5.10.0'; use ModPerl::Registry; # use Apache::Registry; use Apache::DBI; use Apache::AuthDBI; Apache::DBI->connect_on_init('dbi:Pg:dbname=xxxxx;host=localhost', undef, undef, { RaiseError => 1, AutoCommit => 1 }) or die "couldn't connect"; 1;