my $date = scalar localtime;

##</code><code>##

use Time::Piece;

my $date = localtime->cdate;