use Devel::Leak::Object as test