Restore .bak files

Question

I ran a perl script using

perl -p -i.bak -e "..." *.sh dir/*.sh

This created a copy of every file like

script.sh
script.sh.bak

I now want to restore from the .bak files. How can I do this easily?

Answer 1

for file in *.sh.bak dir/*.sh.bak; do cp "$file" "${file//.bak}"; done

Or you could use mv instead of cp.

Answer 2

find -name '*.bak'|sed 's:.bak$::'|xargs -n 1 -I % cp %.bak %