Moving from Class::Singleton to classic OO