Árvore Vermelho/Preto em Perl
