Help for this page

Select Code to Download

Select or download this

use DateTime qw( );
my $date = DateTime
           ->today( time_zone => 'local' )
           ->strftime( '%Y-%m-%d' );

Select or download this

use POSIX qw( strftime );
my $date = strftime( '%Y-%m-%d', localtime );