add perl Singleton module