use Class::MethodMaker
[ new => -singleton=>'new' ];