Función Perl gmtime

Descripción

Esta función devuelve una lista de valores correspondientes a la fecha y hora especificada por EXPR, o la fecha y hora devuelta por la función de hora si se omite EXPR, localizada para la hora estándar de Greenwich. Los valores devueltos son los siguientes:

($ sec, $ min, $ hora, $ mday, $ mon, $ year, $ wday, $ yday, $ isdst) = gmtime (tiempo);

Todos los elementos de la lista son numéricos y provienen directamente de la `struct tm 'de C. $ sec, $ min y $ hour son los segundos, minutos y horas del tiempo especificado. $ 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. $ year es el número de años desde 1900. Es decir, $ year es 123 en el año 2023. $ wday es el día de la semana, donde 0 indica domingo y 3 indica miércoles. $ yday es el día del año, en el rango 0..364 (o 0..365 en años bisiestos). $ isdst siempre es 0.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

gmtime EXPR

gmtime

Valor devuelto

Esta función devuelve una cadena de la forma: Thu Sep 21 14:52:52 2000 en contexto escalar y en contexto de lista 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).

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl

@weekday = ("Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat");

$local_time = gmtime();

print "Local time = $local_time\n";
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time);
$year = $year + 1900;
print "Formated time = $mday/$mon/$year $hour:$min:$sec $weekday[$wday]\n";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

Local time = Sun Sep  1 09:06:41 2013
Formated time = 1/8/2013 9:6:41 Sun