perl adocman