if ($system && $logdate)
{
- my $db = DBI->connect($dsn,$dbuser,$dbpass);
+ my $db = DBI->connect($dsn,$dbuser,$dbpass,{pg_expand_array => 0});
die $DBI::errstr unless $db;
$dsn .= ";host=$dbhost" if $dbhost;
$dsn .= ";port=$dbport" if $dbport;
-my $db = DBI->connect($dsn,$dbuser,$dbpass);
+my $db = DBI->connect($dsn,$dbuser,$dbpass,{pg_expand_array => 0});
# there is possibly some redundancy in this query, but it makes
# a lot of the processing simpler.
$sort_clause = "lower(compiler), compiler_version,";
}
-my $db = DBI->connect($dsn,$dbuser,$dbpass) or die("$dsn,$dbuser,$dbpass,$!");
+my $db = DBI->connect($dsn,$dbuser,$dbpass,{pg_expand_array => 0})
+ or die("$dsn,$dbuser,$dbpass,$!");
my $statement =<<EOS;