#!perl
use v5.10.1;
use strict;
use warnings FATAL => 'all';
use experimental qw(smartmatch);
plan tests => 1;
for my $var (qw($DB)) {
ok(scalar(grep { $_ eq $var } @Sport::Analytics::NHL::Tools::EXPORT), "$var exported");
}