Gostaria de varredura para as linhas duplicadas no arquivo, e imprimir os duplicados para outro ficheiro,
Ah e tem de ser insensível caso.

exemplo

linha1
linha2
linha2
Linha3
Line4
Line4

outputfile:
linha2
Line4

quaisquer ideias

perl -ne '$l = lc(); print if $m{$l}++; ' file

thanks it's trabalhou para um arquivo, mas esqueci-me de acrescentar que, se eu precisar dele para ser executado em um diretório e certifique-se de fazer em um único arquivo e não subdirectório

modificações que você faria

Loop mais arquivos em um diretório, e remover duplicatas? Você deseja substituir os arquivos?

for f in directory/*; do
  test -d "$f" && continue   # skip if it's a subdirectory
  perl -ne '$l = lc(); print if $m{$l}++; ' "$f" >"$f.tmp"
  mv "$f.tmp" "$f"
done

Obrigado Era, ela trabalhou,

awk '{
  a[$0]++
}
END{
 for (i in a)
 if (a[i]=2)
 print i
}' filename