add some perl doc