I have a bunch of files that need name changes (about 1000). Each file
looks like this:

ABC-2008.03.15.19.53.36-2008.03.15.19.54.37.tpd.gz

I need to have the names look like this:

ABC-2008.03.14.19.53.36-2008.03.14.19.54.37.tpd.gz

So, I need to have the day of the month subtracted by 1. The days and
times are all different from March 2 - March 19.

Is there some ksh or perl script that would make this easy to do?
Thanks.

Allyson