Pregunta

Tengo un archivo de texto que contiene:

Cycle code
Cycle month
Cycle year
Event type ID
Event ID
Network start time

Quiero cambiar este texto para que cuando haya un espacio, quiera reemplazarlo con un _. Y después de eso, quiero que los caracteres aparezcan en minúscula como a continuación:

cycle_code
cycle_month
cycle_year
event_type_id
event_id
network_start_time

¿Cómo podría lograr esto?

¿Fue útil?

Solución

Buscando en la documentación de sed un poco más y siguiendo los consejos de los comentarios, el siguiente comando debería funcionar.

sed -r {filehere} -e 's/[A-Z]/\L&/g;s/ /_/g' -i

Otros consejos

Otro método de Perl:

perl -pe 'y/A-Z /a-z_/' file

tr solo funciona:

tr ' [:upper:]' '_[:lower:]' < file

También hay una etiqueta perl en su pregunta. Entonces:

#!/usr/bin/perl

use strict; use warnings;

while (<DATA>) {
    print join('_', split ' ', lc), "\n";
}
__DATA__
Cycle code
Cycle month
Cycle year
Event type ID
Event ID
Network start time

O:

perl -i.bak -wple '$_ = join('_', split ' ', lc)' test.txt
sed "y/ABCDEFGHIJKLMNOPQRSTUVWXYZ /abcdefghijklmnopqrstuvwxyz_/" filename

Solo usa tu shell, si tienes Bash 4

while read -r line
do
    line=${line,,} #change to lowercase
    echo ${line// /_}
done < "file"  > newfile
mv newfile file

Con gawk :

awk '{$0=tolower($0);$1=$1}1' OFS="_" file

Con Perl:

perl -ne 's/ +/_/g;print lc' file

Con Python:

>>> f=open("file")
>>> for line in f:
...   print '_'.join(line.split()).lower()
>>> f.close()
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow
scroll top