recursively strip the last two chars from filenames

gistfile1.sh

#!/bin/sh
#recursively strip the last two chars from filenames
#shane s antyr
find . -type f -print | while read file
do
    file_clean=$( echo ${file} | sed 's/\(.*\)../\1/')
    echo $file $file_clean
    mv $file $file_clean
done