Date arithmetic with shell or perl

http://www.unix.com/answers-frequently-asked-questions/13785-yesterdays-date-date-arithmetic.html