#!/usr/bin/perl

use DBI;
use XML::LibXML;

my $dbh = DBI->connect('DBI:Pg:dbname=mydb', 'user', 'password');
    or die $DBI::errstr;

##</code><code>##

Segmentation fault: 11 (core dumped)