Help for this page
use Date::Format; print time2str( '%Y-%m-%e', time );
perl -MDate::Format -e 'print time2str( "%Y-%m-%e", time )'