perl -i.bak -l015 -pe1 *.txt