my $math = Date::Math->new(); print $math->addition("2016/05/16", 5, "days"); if($math->daylightsavingstime_in_effect) { print "DST is in effect."; } print "That falls on a ", $math->weekday_name($math->addition("2016/05/16", 5, "days"));