Fonction Perl localtime

La description

Cette fonction convertit l'heure spécifiée par EXPR dans un contexte de liste, renvoyant un tableau de neuf éléments avec l'heure analysée pour le fuseau horaire local actuel. Les éléments du tableau sont -

# 0  1    2     3     4    5     6     7     8
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

Si EXPR est omis, utilise la valeur renvoyée par heure.

$ mday est le jour du mois et $ mon est le mois lui-même, dans la plage 0..11 avec 0 indiquant janvier et 11 indiquant décembre.

$ year est le nombre d'années depuis 1900, pas seulement les deux derniers chiffres de l'année. Autrement dit, $ année est 123 en 2023. La bonne façon d'obtenir une année complète à 4 chiffres est simplement: $ année + = 1900;

Syntaxe

Voici la syntaxe simple de cette fonction -

localtime EXPR

Valeur de retour

Cette fonction renvoie une chaîne de la forme: Thu Sep 21 14:52:52 2000 dans un contexte scalaire et les valeurs des composants de temps individuels (secondes, minutes, heures, jour du mois, mois, année, jour de la semaine, jour de l'année, heure d'été) dans le contexte de la liste.

Exemple

Voici l'exemple de code montrant son utilisation de base -

#!/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";

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

19, 58, 14, 1, 8, 2013, 0, 243, 0
Sun Sep  1 14:58:19 2013
Sun Sep  1 14:58:19 2013