$ perl -MTime::Piece -E 'say localtime; $x = localtime; say $x'
4351751111833380
Wed Dec  5 17:05:43 2018