perl 5 module for creating random person data