Função Perl gmtime

Descrição

Esta função retorna uma lista de valores correspondentes à data e hora conforme especificado por EXPR, ou data e hora retornada pela função de hora se EXPR for omitido, localizado para o horário padrão de Greenwich. Os valores retornados são os seguintes -

($ sec, $ min, $ hour, $ mday, $ mon, $ year, $ wday, $ yday, $ isdst) = gmtime (time);

Todos os elementos da lista são numéricos e vêm diretamente do C `struct tm '. $ sec, $ min e $ hour são os segundos, minutos e horas do tempo especificado. $ mday é o dia do mês e $ mon é o próprio mês, no intervalo 0..11 com 0 indicando janeiro e 11 indicando dezembro. $ year é o número de anos desde 1900. Ou seja, $ year é 123 no ano 2023. $ wday é o dia da semana, com 0 indicando domingo e 3 indicando quarta-feira. $ yday é o dia do ano, no intervalo de 0..364 (ou 0..365 em anos bissextos). $ isdst é sempre 0.

Sintaxe

A seguir está a sintaxe simples para esta função -

gmtime EXPR

gmtime

Valor de retorno

Esta função retorna uma string no formato: Thu Set 21 14:52:52 2000 em contexto escalar e em contexto de lista os valores individuais dos componentes de tempo (segundos, minutos, horas, dia do mês, mês, ano, dia da semana, dia do ano, horário de verão).

Exemplo

A seguir está o código de exemplo que mostra seu 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";

Quando o código acima é executado, ele produz o seguinte resultado -

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