$ perl -ce '$no_days = "(TO_DAYS(dateadded)-TO_DAYS(Now())>=-$newdateadded)";' -e syntax OK