perl sprintf YYYYMMDD sample
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
my $now = sprintf("%04d-%02d-%02d %02d:%02d:%02d", $year+1900, $mon+1, $mday, $hour, $min, $sec);
Are there any code examples left?
New code examples in category Perl
-
Perl 2022-01-31 06:16:22 perl format decimal 2 places not rounding
-
Perl 2022-01-30 18:35:07 perl id number validation south africa
-
Perl 2022-01-22 12:46:02 perl add key value pair to hash
-
Perl 2021-11-22 01:55:21 unique in perl
-
Perl 2021-11-13 15:55:08 perl lowercase
-
Perl 2021-11-11 03:30:19 perl write to file
-
Perl 2021-11-06 22:53:11 perl for loop