The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use List::MoreUtils qw(apply);

$ENV{TEST_DBMS} = 'postgresql';

require(apply { s/\-pgsql.t$/\.pl/ } $0);