use Test::More tests => 9; # ... snipped setup of $obj = new & etc. my $sth = $obj->prepare('SELECT * FROM test_table'); can_ok($obj, 'prepare'); #succeeds! # this fails: isnt ($sth, undef, 'prepare creates statement handle');