Definir uma pessoa com o módulo Perl/CPAN User::Identity
