Gerador de dados aleatórios em Perl
