File Coverage

blib/lib/DBIx/QuickDB/Driver/Percona.pm

Criterion	Covered	Total	%
statement	21	21	100.0
branch			n/a
condition			n/a
subroutine	8	8	100.0
pod	0	2	0.0
total	29	31	93.5

package DBIx::QuickDB::Driver::Percona;
use strict;
use warnings;

our $VERSION = '0.000051';

use IPC::Cmd qw/can_run/;
use Capture::Tiny qw/capture/;

use parent 'DBIx::QuickDB::Driver::MySQLCom';
use DBIx::QuickDB::Util::HashBase;

sub provider { 'Percona Server' }

sub dbd_driver_order { my $class = shift; $class->SUPER::dbd_driver_order($ENV{QDB_PERCONA_DBD}) }

1;

__END__