use warnings; use strict; use Test::More qw(no_plan); my $foo = {}; isa_ok($foo, 'My::Object');