Também dá para fazer assim: perl -E 'map$h{$_}++||say,sort<>' lista.txt Ou substituir o "say" por "print", se não puder vários "\n". -- Renan Rangel -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/rio-pm/attachments/20080307/5122a4b1/attachment.html