Re: create array from strftime

[ikegami]

in reply to create array from strftime

Problem #1: strftime doesn't take an epoch time for argument.

Problem #2: strftime returns a single string.

Then there's also the fact that "3 scalars" are not "an array".

Solution:

my ($day, $month, $year) = (localtime)[3,4,5];
$month += 1;
$year  += 1900;

localtime.

[taint]

Or read the output of strftime(3). :)
Here's another example:

use POSIX qw(strftime); # POSIX is your friend
# see man strftime(3) for format options
my $gmtstring = strftime "%F %H:%I:%S %z", localtime;
print $gmtstring;

Hope this helps.

[ikegami]

How does one use that to populate $day, $month and $year?

[taint]

I used this to populate Month. Couldn't something similar be used for Year & Day?

use Time::Piece;
use strict;
my @months = qw( 01 02 03 04 05 06 07 08 09 10 11 12 );
  my $t = localtime;
  print localtime->month(@months);