my ($past_year,$past_month,$past_day) = Add_Delta_Days($year,$month,$day, -10);