Come si esegue un comando per ogni riga di un file?

Question

Per esempio, in questo momento sto utilizzando la seguente per cambiare un paio di file i cui percorsi Unix ho scritto in un file:

cat file.txt | while read in; do chmod 755 "$in"; done 

Esiste un modo più elegante, più sicuro?

Answer 1

Se il file non è troppo grande e tutti i file sono ben nominato (senza spazi o altri caratteri speciali come virgolette), si potrebbe semplicemente:

chmod 755 $(<file.txt) 

Se si dispone di caratteri speciali e/o molte linee in file.txt.

xargs -0 chmod 755 < <(tr \\n \\0 <file.txt) 

se il comando deve essere eseguito esattamente 1 ora da ingresso:

xargs -0 -n 1 chmod 755 < <(tr \\n \\0 <file.txt) 

Questo non è necessario per questo campione, come chmod accetta più file come argomento, ma questa partita il titolo di domanda .

Per qualche caso particolare, si potrebbe anche definire la posizione del file come argomento in comandi generateds da xargs:

xargs -0 -I '{}' -n 1 myWrapper -arg1 -file='{}' wrapCmd < <(tr \\n \\0 <file.txt) 

Answer 2

Sì.

while read in; do chmod 755 "$in"; done < file.txt 

In questo modo si può evitare un processo cat.

cat è quasi sempre negativo per uno scopo come questo. Si può leggere di più su Useless Use of Cat.

Answer 3

se si dispone di un bel selettore (ad esempio tutti i file TXT in un dir) si potrebbe fare:

for i in *.txt; do chmod 755 "$i"; done 

bash for loop

o una variante di il tuo:

while read line; do chmod 755 "$line"; done <file.txt 

Answer 4

Se si sa che non si dispone di spazi bianchi nell'input:

xargs chmod 755 < file.txt 

se ci potrebbe essere spazio bianco nei percorsi, e se si dispone di GNU xargs:

tr '\n' '\0' < file.txt | xargs -0 chmod 755 

Answer 5

vedo che hai contrassegnato bash, ma Perl sarebbe anche un buon modo per farlo:

perl -p -e '`chmod 755 $_`' file.txt 

È anche possibile applicare un'espressione regolare per assicurarsi di ottenere i file corretti, ad es. al solo processo txt file:

perl -p -e 'if(/\.txt$/) `chmod 755 $_`' file.txt 

"Anteprima" quello che sta succedendo, basta sostituire il backticks con virgolette doppie e fallo precedere print:

perl -p -e 'if(/\.txt$/) print "chmod 755 $_"' file.txt 

Answer 6

Se si desidera eseguire il comando in parallelo per ogni linea è possibile utilizzare GNU Parallel

parallel -a <your file> <program> 

Ogni riga del file verrà passata al programma come argomento. Per impostazione predefinita, parallel esegue quanti thread contano le CPU. Ma puoi specificarlo con -j