Dodaj nagłówek do pliku rozdzielanego tabulatorami

Question

Chciałbym dodać nagłówek do pliku rozdzielanego tabulatorami, ale nie jestem pewien, jak to zrobić w jednym wierszu w systemie Linux.

Powiedzmy mój plik jest:

roger\t18\tcolumbia\tnew york\n 
albert\t21\tdartmouth\tnew london\n 
etc... 

i teraz chciałbym dodać nagłówek, który mówi:

name\tage\tuniversity\tcity 

Jak miałbym to zrobić w jednej linii w systemie Linux ? Jestem w porządku z awk, sed, cat, itp. Nie zna w ogóle z perl chociaż.

Answer 1

Nie ma „poprzedzić” operator jak „Dołącz” operatora >>, ale można napisać nagłówek do temp pliku, skopiować zawartość pliku jest w temp akt po tym, i przenieść go z powrotem:

echo -e "name\tage\tuniversity\tcity" | cat - yourfile > /tmp/out && mv /tmp/out yourfile 

Answer 2

Najpierw utwórz plik o zawartości nagłówka:

$ cat >header 
name^Iage^Iuniversity^Icity (return) 
^D 

(gdzie ^I jest kluczem karta)

Następnie poprzedzić go z danymi

$ cat header myfile >newfile 
$ mv newfile myfile 

Answer 3

$ { printf 'name\tage\tuniversity\tcity\n'; cat orig-file; } > new-file 

Albo

$ printf '1\ni\nname\tage\tuniversity\tcity\n.\nw\n' | ed -s orig-file 

Answer 4

Osobiście chciałbym wybrać z nano -w file.txt ;-) (np. wystarczy użyć edytora tekstu, nie musi być nano oczywiście)

Ale jeśli chcesz zrobić to w nie-interaktywnym środowisku z jakiegoś powodu, można użyć cat dla wszystkich rodzajów powiązań,:

echo $'name\tage\tuniversity\tcity' | cat - file.txt > file2.txt 

spowoduje dodanie nagłówka do nagłówka i umieszczenie go w postaci file2.txt. Jeśli chcesz zastąpić oryginalny plik można zrobić z

echo $'name\tage\tuniversity\tcity' | cat - file.txt > file2.txt; mv file{2,}.txt 

Albo można użyć sed następująco:

sed -i $'1 i\\\nname\tage\tuniversity\tcity' file.txt 

Zauważ, że używam $'...' cytując pozwoli mi korzystać \t do reprezentuje tabulator i \n, aby reprezentować znak nowej linii (pośród innych podstawień, zobacz stronę basha dla więcej). W tego typu cytowanym łańcuchu \\ reprezentuje literalny ukośnik odwrotny. Więc program przechodzi do sed jest rzeczywiście

1 i\ 
name age  university  city 

Answer 5

perl -i -lne 'if($.==1){print "newline\n$_"}else{print}' your_file 

Answer 6

cat <(head -1 theFileWithHeader) theFileWithoutHeader > newfile; 
mv newfile theFileWithoutHeader;