my $object = B->new;
$object->someWeirdMethod;