Dosya adlarını satırların sonuna ekle

Question

Birçok fasta dosyam var ve dosyaların sonuna satırların sonuna eklemek istiyorum (başlık satırı). Bunu 1 by 1 by sed tarafından nasıl yapacağımı biliyorum ama birçok dosya için daha iyi bir çözüm arıyorum.

File1.txt 
>1 
ACGTA 

File2.txt 
>2 
GTCA 

beklenen Ne:

File1.txt 
>1_File1 
ACGTA 

File2.txt 
>2_File2 
GTCA 

Bu OSX sed kullanarak tek bir dosya için çalışır:

sed -i.bak '/>.*$/ s/$/_File1/' File1.txt 

Teşekkür

Answer 1

Sen döngü için bu basit kullanabilirsiniz:

for f in *.txt; do 
    sed -i '' 's/^>.*/&_'"${f%.*}"'/' "$f" 
done 

"${f%.*}" dosya gelen uzantısı şerit olacak.

Answer 2

Sen ifadesi göre değişiklik gerekebilir

senin dosya isimleri, ancak temel olarak tüm dosyaları

boyunca yinelemek istiyorsunuz

#!/bin/bash 
    for file in *.txt 
    do 
     #just for echo the current 'file' var for testing 
     echo "$file" 
     sed -i.bak '/>.*$/ s/$/_"$file"/' $file 
    done 

Answer 3

Sen Perl INPLACE düzenleme yetenekleri kullanabilirsiniz:

perl -i.bak -p0e '$ARGV =~ s/\..*//; s/>.*/$&_$ARGV/' File*.txt