$ perl -e ' $newdateadded = "NDA"; $no_days = "(TO_DAYS(dateadded)-TO_DAYS(Now())>=-$newdateadded)"; print $no_days; ' (TO_DAYS(dateadded)-TO_DAYS(Now())>=-NDA)