in reply to Error calling Date:Calc Date_to_Days

You need a semicolon after use Date::Calc qw(:all)

Also, in your Add_Delta_Days statement, 1,1,1 is not a valid date.