$ perl -MDateTime -E 'say DateTime->now->strftime("%Y-%m-%d %H:%M:%S")'
2012-06-18 01:58:52