$ perl -Mstrict -Mwarnings -MDateTime -E'
say DateTime->now->strftime("%a %b %d %T.%3N %Y")
'
Fri Mar 24 11:53:41.000 2017