---- Original Message ----
De: [EMAIL PROTECTED]
A: [EMAIL PROTECTED], 
Objet: Re: Programmation Perl
Date: Thu, 04 Jan 2001 22:17:38 +0100

>Bonsoir
>
>tout d'abord, bonne année a toutes et tous et longue vie à la liste 
>:-)
>
>j'aurais une petite question de débutant en Perl. Quelle la fonction
>standard (les mathématiciens diraient canonique :-) pour transformer 
>un
>nombre de secondes écoulées depuis le 1.1.1970 en une date...
>J'ai regardé dans les package Date::Calc et Date::Manip, mais je n'ai
>pas trouvé de que je cherchais... y'a bien une routine pour l'autre
>sens, mais je n'ai pas trouvé dans le sens secondes --> date
>

Il faut utiliser localtime()

exemple:

#!/usr/bin/perl
$t = time();
($sec,$min,$h,$d,$m,$y)=localtime($t);
printf("Secondes depuis 1970:%d\n",$t);
printf("Date: %02d-%02d-%04d
Heure:%02d:%02d:%02d\n",$d,$m+1,$y+1900,$h,$min,$sec);

marcel


--
http://www-internal.alphanet.ch/linux-leman/ avant de poser
une question.

Répondre à