in reply to Using Test::MockObject

$gq is undef because your mocked constructor does nothing. You need to return $TMO or another mock object instead.