I need to get current time using Joda time format ... Ex : "EEE MMM dd HH:mm:ss.SSS yyyy"

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

$ perl -Mstrict -Mwarnings -MDateTime -E'
say DateTime->now->format_cldr("EEE MMM dd HH:mm:ss.SSS yyyy")
'
Fri Mar 24 11:54:35.000 2017
[download]

Note that DateTime is apparently using time, so the milliseconds is always '000'. If you want more precision you'll have to get the hi-res time yourself using Time::HiRes, which you have as part of the Perl core:

perl -Mstrict -Mwarnings -MTime::HiRes=time -MDateTime -E'
say DateTime->from_epoch( epoch => time )->format_cldr("EEE MMM dd HH:
+mm:ss.SSS yyyy")
'
Fri Mar 24 11:55:26.137 2017
[download]

Hope this helps!