Funzione Perl gmtime

Descrizione

Questa funzione restituisce un elenco di valori corrispondenti alla data e all'ora specificate da EXPR, o la data e l'ora restituite dalla funzione ora se EXPR viene omesso, localizzato per l'ora media di Greenwich. I valori restituiti sono i seguenti:

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

Tutti gli elementi della lista sono numerici e provengono direttamente dalla C `struct tm '. $ sec, $ min e $ hour sono i secondi, i minuti e le ore dell'ora specificata. $ mday è il giorno del mese e $ mon è il mese stesso, nell'intervallo 0..11 con 0 che indica gennaio e 11 che indica dicembre. $ year è il numero di anni dal 1900. In altre parole, $ year è 123 nell'anno 2023. $ wday è il giorno della settimana, con 0 che indica domenica e 3 che indica mercoledì. $ yday è il giorno dell'anno, nell'intervallo 0..364 (o 0..365 negli anni bisestili). $ isdst è sempre 0.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

gmtime EXPR

gmtime

Valore di ritorno

Questa funzione restituisce una stringa nel formato: Thu Sep 21 14:52:52 2000 in contesto scalare e in contesto elenco i valori dei singoli componenti del tempo (secondi, minuti, ore, giorno del mese, mese, anno, giorno della settimana, giorno dell'anno, ora legale).

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/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 viene eseguito il codice sopra, produce il seguente risultato:

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