perl -lpe 's/[[:^print:]]+//g' fichier.txt
perl -ne 'print unless $a{$_}++' fichier.txt
perl -ne 'print "$. $_" if $a{$_}++' fichier.txt