test with MooseX::MarkAsMethods