#!/bin/bash # perl -pi -e 's/(.*)/$1(kjv)/' KJVb.txt for X in 'ls ??k_*.txt' do perl -pi -e 's/(.*)/$1(kjv)/' $X done