use strict;
use warnings;
use List::MoreUtils qw(apply);
$ENV{TEST_DBMS} = 'mysqld';
require(apply { s/\-mysql.t$/\.pl/ } $0);
use strict;
use warnings;
use List::MoreUtils qw(apply);
$ENV{TEST_DBMS} = 'mysqld';
require(apply { s/\-mysql.t$/\.pl/ } $0);