Hmmm...that's excellent exegesis.

Whence I had thought I besought for errors to be caught then taught, I had:

my $dbh    = DBI->connect($DSN, $userid, $sesame, {
    AutoCommit => 0,
    RaiseError => 1,
    PrintError => 0
}) or die "Connection failed!\n" . $DBI::errstr;
[download]

Hence I shall beseech for errors to be bleached and for Pg to teach me with:

my $dbh    = DBI->connect($DSN, $userid, $sesame, {
    AutoCommit => 1,
    RaiseError => 1,
    PrintError => 1
}) or die "Connection failed!\n" . $DBI::errstr;
[download]

May thy code be blessed by the Profit of thy scripts.