#!/usr/bin/perl use lib '../..'; use Test::More tests => 2; use DBD::Function; my $func = DBD::Function->new('test'); isa_ok $func, 'DBD::Function'; is $func->name, 'test', 'Function name';