![]() |
|
|
google unix.com
|
|||||||
| Foros | Registro | Reglas de los Foros | Enlaces | Álbumes | Preguntas más frecuentes | Lista de miembros | Calendario | Búsqueda | Puestos de hoy | Marcar Foros Como Leídos |
| Programación de scripts de shell y Plantear preguntas sobre KSH, CSH, SH, BASH, PERL, PHP, SED, AWK y otros scripts de shell y lenguajes de script de shell aquí. |
Más UNIX y Linux Foro Temas usted puede encontrar útiles
|
||||
| Hilo | Hilo para principiantes | Foro | Respuestas | Último mensaje |
| concatenar todos duplicado en línea de un archivo. | vaskarbasak | Programación de scripts de shell y | 30 | 08-29-2008 06:31 AM |
| lectura archivo de texto línea por línea | MizzGail | Programación de scripts de shell y | 6 | 04-14-2008 07:58 AM |
| La eliminación de direcciones IP duplicadas de un archivo de texto | coolkid | Programación de scripts de shell y | 4 | 01-24-2008 07:22 PM |
| Registros duplicados de oráculo al archivo de texto. | shilendrajadon | UNIX para usuarios avanzados y expertos | 1 | 01-10-2008 11:21 AM |
| paginación un archivo de texto línea por línea? | tomapam | UNIX for Dummies Preguntas y Respuestas | 2 | 10-07-2002 10:30 am |
![]() |
|
|
Linkback vínculo | Herramientas de hilo | Buscar en este Hilo | Tasa de Hilo | Modos de visualización |
|
|
|
||||
|
duplicar la línea en un archivo de texto
Quisiera archivo de análisis en duplicado de líneas, e imprimir los duplicados en otro archivo,
oh y tiene que ser entre mayúsculas y minúsculas. ejemplo línea1 line2 line2 línea3 line4 line4 OutputFile: line2 line4 todas las ideas |
|
||||
|
Código:
perl -ne '$l = lc(); print if $m{$l}++; ' file
lc devuelve la cadena especificada en minúsculas, en este caso, sin parámetro, por defecto a la actual línea de entrada. $ m ($ l) es el conteo del número de veces que hemos visto $ l, si es distinto de cero, es un duplicado, por lo que imprima. Editado por última época; al 04-25-2008 02:50 PM.. Motivo: Añadir explicación |
|
||||
|
Cita:
gracias que trabajaba para un archivo, pero se me olvidó añadir que si necesito que se ejecute en un directorio y asegúrese de hacerlo en un archivo y no sólo subdirectorio qué modificaciones haría usted |
|
||||
|
Bucle más de archivos en un directorio, y eliminar los duplicados? ¿Desea reemplazar los archivos? Código:
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
|
|
||||
|
Gracias Era, funcionó,
![]() |
|
||||
|
Código:
awk '{
a[$0]++
}
END{
for (i in a)
if (a[i]=2)
print i
}' filename
|
![]() |
| Marcadores |
| Herramientas de hilo | Buscar en este Hilo |
| Modos de visualización | Vota a este hilo |
|
|