$ perl -E 'use Time::Seconds; say ONE_DAY'
86400