[Cascavel-pm] Linhas repetidas

Nelson Ferraz nferraz em phperl.com
Quarta Junho 30 16:40:29 CDT 2004


dexter em ticbrasil.com.br wrote:
> Como tiro as linhas repetidas de um arquivo 

Você pode usar uma expressão idiomática muito comum em Perl, que é um 
hash ("%seen") que indica as linhas que já foram vistas:

	my %seen = ();
	while (<>) {
	  print unless $seen{$_};
	  $seen{$_} = 1;
	}

[]s

Nelson



Mais detalhes sobre a lista de discussão Cascavel-pm