date time perl code example
Example 1: perl set a specific datetime
use DateTime;
my $YourDate = DateTime->new(
year => <your-year>,
month => <your-month>,
day => <your-day>,
hour => <your-hour>,
minute => <your-minute>,
second => <your-second>,
nanosecond => <your-nanosecond>,
);
use DateTime;
my $YourDate = DateTime->new(
year => 1994,
month => 05,
day => 25,
hour => 13,
minute => 31,
second => 18,
nanosecond => 0,
);
Example 2: perl get date
use POSIX;
use Time::Piece;
my $CurTime = localtime();
my $FormattedTime = $local_time->strftime('<FormatOfDateTime>');
use POSIX;
use Time::Piece;
my $CurTime = localtime();
print "[CurTime:$CurTime]\n";