Select Code to Download

open (ALIGNED, "<:encoding(UTF-8)", "${filename}.txt") or die "Can't o
+pen aligned file for reading: $!";
open (ALIGNED_MOD, ">:encoding(UTF-8)", "${filename}_mod.txt") or die 
+"Can't open file for writing: $!";
...
    close ALIGNED_MOD;
    rename ("${filename}_mod.txt", "${filename}.txt") or die "Can't re
+name file: $!";
}