#!/usr/bin/perl -T

use strict;
use warnings;

use Test::More;

BEGIN {
    eval { require DBD::Sqlite }
        or plan skip_all => "This test requires DBD::Sqlite";
}

...