Función Perl localtime
Descripción
Esta función convierte el tiempo especificado por EXPR en un contexto de lista, devolviendo una matriz de nueve elementos con el tiempo analizado para la zona horaria local actual. Los elementos de la matriz son:
# 0 1 2 3 4 5 6 7 8
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
Si se omite EXPR, utiliza el valor devuelto por el tiempo.
$ mday es el día del mes y $ mon es el mes mismo, en el rango 0..11, donde 0 indica enero y 11 indica diciembre.
$ año es el número de años desde 1900, no solo los dos últimos dígitos del año. Es decir, $ año es 123 en el año 2023. La forma correcta de obtener un año completo de 4 dígitos es simplemente: $ año + = 1900;
Sintaxis
A continuación se muestra la sintaxis simple para esta función:
localtime EXPR
Valor devuelto
Esta función devuelve una cadena de la forma: Thu Sep 21 14:52:52 2000 en contexto escalar y los valores de los componentes de tiempo individuales (segundos, minutos, horas, día del mes, mes, año, día de la semana, día del año, horario de verano) en el contexto de la lista.
Ejemplo
A continuación se muestra el código de ejemplo que muestra su uso básico:
#!/usr/bin/perl -w
use POSIX;
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
localtime(time);
$year += 1900;
print "$sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst\n";
$now_string = localtime;
print "$now_string\n";
$now_string = strftime "%a %b %e %H:%M:%S %Y", localtime;
print "$now_string\n";
Cuando se ejecuta el código anterior, produce el siguiente resultado:
19, 58, 14, 1, 8, 2013, 0, 243, 0
Sun Sep 1 14:58:19 2013
Sun Sep 1 14:58:19 2013