Funzione Perl time

Descrizione

Questa funzione restituisce il numero di secondi trascorsi dall'epoca (00:00:00 UTC, 1 gennaio 1970, per la maggior parte dei sistemi; 00:00:00, 1 gennaio 1904, per Mac OS). Adatto per l'alimentazione di gmtime e localtime.

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

time

Valore di ritorno

Questa funzione restituisce un numero intero, i secondi dall'epoca.

Esempio

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

#!/usr/bin/perl -w

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

$retval = time();

print "Return time is $retval\n";
$local_time = gmtime( $retval);

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

Quando viene eseguito il codice sopra, produce il seguente risultato:

Return time is 1176831539
Local time = Tue Apr 17 17:38:59 2007
Formated time = 17/4/2007 17:38:59 Tue