src/modules/extra/pgsql_config.pl


1
2
3
4
5
6

#!/usr/bin/perl

my $s = `pg_config --version`;
$s =~ /^.*?(\d+)\.(\d+)\.(\d+).*?$/;
my $v = hex(sprintf("0x%02x%02x%02x", $1, $2, $3));
print "-D PGSQL_HAS_ESCAPECONN" if(($v >= 0x080104) or (($v >= 0x07030F) and ($v < 0x080000)));