$ perl -MDate::Simple=:all -wE 'say today() - 3' 2010-06-12 $ [download]
In reply to Re: 3 days previous Date by JavaFan in thread 3 days previous Date by Anonymous Monk