Wagner, valeu mesmo por essa dica agora entendi e consegui o que queria. Também gostaria de agrdecer a todos que me ajudaram ak sobre perl Valews