# Retain only part of a file name and fasta header in fasta directory

I have a MainDirectory/hundreds_of_subdirectories/thousands_of_fastas structure. For each fasta in the bottom level, I am trying to change the file name as well as the first line in the file to retain only some parts of the file.

So that the following text, which makes up both the file name and the first name of the file:

947-length-1150-cov-1000|contig:JAECWU010000213.1|slice:817050-818200|uce:uce-1452|match:817550-817700|orient:{'+'}|probes:4.unaligned.fasta


becomes just:

uce-1452.unaligned.fasta


For editing the first line in the file, I have tried

sed '1 s/^[^|uce-]*(|uce-[0-9]).*/\1/' hundreds_of_subdirectories/*


but this isn't the ticket..

Then messing around with some kind of loop...

for i in *\*.unaligned.fasta
do
sed -E 's/^[^|uce-]*(|uce-[0-9]).*/\1/'
done


For the file name, it was suggested that I use rename instead of sed, but with sed I have tried something like:

for x in hundreds_of_subdirectories/thousands_of_fastas*unaligned.fasta
do
echo x | sed -r 's/^[^|uce-]*(|uce-[0-9]).*/mv' -v "\0" "|uce-[0-9].*/\1/.unaligned.fasta"/ done  Am I even barking up the right tree? Thanks! • What operating system are you using? May 24 at 14:36 ## 2 Answers If you are using bash, you can enable the globstar option (shopt -s globstar) which allows ** to match recursively. That way, **/*fasta will find all files whose name ends with fastq in this directory and all of its subdirectories. So that will let you easily iterate over all the target names. Next, if you have the perl rename command (called rename on Debian and Ubuntu and similar systems, prename or perl-rename on others), you can do it quite easily. Note that perl-rename has the -n option that makes it print out the renaming it would do without actually renaming anything. So I suggest you first run this to test what you will be doing: shopt -s globstar for file in **/*.fasta; do echo perl -i.bak -pe 's/^\s*>.*uce:(uce-\d+).*(\.unaligned.fasta)/1$2/' "$file"
rename -n 's/^.*uce:(uce-\d+).*(\.unaligned.fasta)/$1$2/' "file" done  That will echo the perl command, so you can try it manually first and make sure it works, and will print out the rename operations without actually doing anything. If you are satisfied it will work, run again without the echo or -n: for file in **/*fasta; do perl -i.bak -pe 's/^\s*>.*uce:(uce-\d+).*(\.unaligned.fasta)/1$2/' "$file
rename 's/^.*uce:(uce-\d+).*(\.unaligned.fasta)/$1$2/' "file" done  Or, if you don't have perl-rename, you can use the shell's string manipulation for this: for file in **/*.fasta; do perl -i.bak -pe 's/^\s*>.*uce:(uce-\d+).*(\.unaligned.fasta)/1$2/' "$file
tmpFileName="${file#*uce:}" mv -- "$file" "{tmpFileName/|*/.unaligned.fasta}" done  ### Explanation • shopt -s globstar: this enables the globstar bash option for the current shell session. It only needs to be run once, its effects will last until you close the terminal or start a new shell session. As for what it does, see man bash: globstar If set, the pattern ** used in a pathname expansion context will match all files and zero or more directories and subdirectories. If the pattern is followed by a /, only directories and subdirectories match. • for file in **/*fasta; do ... ; done: iterate over all files (and directories) whose name ends in .fasta, saving each file name as file.

• perl -i.bak -pe 's/^\s*>.*(uce-\d+).*(\.unaligned.fasta)/$1$2/' "$file: this changes the fasta header. The -i.bak option tells perl to edit the file in place, but to save the original file with a .bak extension. This can help you revert any changes if there is a mistake. Once you have finished, you could run rm **/*fasta.bak to delete the backups. Alternatively, just remove the -i.bak if you don't want to keep backups. The -p option tells perl to process its input line by line and print every line after applying whatever script you give it with -e. The s/old/new/ is the substitution operator, same as sed. The regular expression is looking for 0 or more whitespace characters and then a > at the beginning of the line (^\s*>). It then allows for 0 or more characters (.*) until it finds the string uce: followed by uce- and one or more digits (uce:(uce-\d+)). The parentheses "capture" the pattern, storing it as $1. Next, we want 0 or more characters again until we reach .unaligned.fasta (.*(\.unaligned.fasta)). We capture the .unaligned.fasta as 2 (second set of parentheses) only to avoid typing it out again. Note that this assumes you will never have anything after the .unaligned.fasta. Finally, we replace everything matched above with just 1 (the uce-numbers) and 2 (.unaligned.fasta). • rename 's/^.*uce:(uce-\d+).*(\.unaligned.fasta)/1$2/' "$file": the rename opration. This will match everything from the beginning of the file name until the last occurrence of uce:uce-NNNN, capture the uce-NNNN as 1 then skip the remaining characters until .unaligned.fasta and finally rename as just 1$2 (the capturing logic is the same as above). • tmpFileName="${file#*uce:}": The ${var#pattern} syntax means "print the value of $var, but remove the shortest match of pattern from the front of the variable's value". The ${var//pattern/replacement} syntax means "print the value of $var and replace the first occurrence of pattern with replacement. Here, the pattern is |* which means "anything after a |" (note that this is shell stuff and is using globs and not regular expressions). This is probably easier to understand with an example:

$echo "$file"
947-length-1150-cov-1000|contig:JAECWU010000213.1|slice:817050-818200|uce:uce-1452|match:817550-817700|orient:{'+'}|probes:4.unaligned.fasta
$tmpFileName="${file#*uce:}"
$echo "$tmpFileName"
uce-1452|match:817550-817700|orient:{'+'}|probes:4.unaligned.fasta
$echo "${tmpFileName/|*/.unaligned.fasta}"
uce-1452.unaligned.fasta


So, given tmpFileName="${file#*uce:}", "${tmpFileName/|*/.unaligned.fasta}" is the desired file name and this is what we pass to mv.

I think you're working too hard to capture the uce: expression.

Try

sed -Ee '1s/^.+uce:(uce-[0-9]+).+/\1.unaligned.fasta/' file_glob


to replace the first line content. You may want to add the in-place flag after testing the expression on a few files.

For the mv, use command substitution, which runs the command in a sub-shell and uses the output value as the parameter:

for f in file_glob
do
mv -- "$$f" "$$(echo \"\$f\" | sed '...')"
done

• Note that your sed will not do what the OP wants: it will change the first line to >uce-1452 and not uce-1452.unaligned.fasta. May 24 at 15:22
• Thanks, @terdon. I was nudging OP in the right direction. The .unaligned.fasta is trivial to add once OP switches to a simpler solving mindset. I'll add it in to make the solution more complete though. May 24 at 15:32
• Force of habit: that protects from the (admittedly unlikely) case where a fasta file's name starts with -. Without the --, mv will treat that as an option and fail. Try mv -badName goodName and contrast with mv -- -badName goodName. May 24 at 15:35
• Thanks, I did some googling and saw why the -- prevents filenames from manifesting nightmares in worst case scenarios, which is why I deleted my earlier comment that asked you why you recommend mv --. May 24 at 15:36
• Of course, if I were being careful, I should also have added -- to the echo in case the file name begins with -n. But I forgot and it really is vanishingly unlikely that this would happen with actual fasta file names. May 24 at 15:37