Discussion :

[dubis]

Bonjour

J'ai le script suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl
 
use POSIX;
 
use strict;
use warnings;
my $unixtime1 = 1326703902;
my $unixtime2 = mktime (localtime);
my $unixtime = $unixtime2 - $unixtime1 ;
print "$unixtime\n";
 
my $readable_time = localtime($unixtime);
 
print "$readable_time\n";

Je ne suis pas satisfait du résultât. En effet, lorsque que je l'ai exécuté il m'a afficher ceci :
24379
Thu Jan 1 07:46:19 1970

Comment faire pour que 24379 affiche 7:46:19. Je préfère avoir des heures et non pas une date avec jours et année, car le script actuel ne dépassera jamais 23 heures il repassera à 0.

Merci de votre aide.

[dubis]

Ok, je pense que je me suis mal exprimé car en plus j'etais devant l'évidence ....
J'avais mon delta en seconde, il ne faut donc pas que je le transforme en date mais que je le convertisse en heures, minutes et secondes.

Grace à ce lien dans le forum pascal :
http://www.developpez.net/forums/d22...heure-min-sec/

Mon script est donc devenu comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/perl
use POSIX;
use strict;
use warnings;
 
my $unixtime1 = 1326703902;
my $unixtime2 = mktime (localtime);
my $unixtime = $unixtime2 - $unixtime1 ;
print "$unixtime\n";
 
my $heures=int($unixtime / 3600);
my $minutes=int(($unixtime % 3600) / 60);
my $secondes=int((($unixtime % 3600) % 60));
 
print "$heures\:$minutes:$secondes\n";

Naturellement je ne sais pas ce que c'est le modulus...

Comment pourrais je ajouter un 0 devant les chiffres?
exemple 30:4:45 serait afficher comme ceci 30:04:45

Merci d'avance

[estofilo]

La méthode la plus répandue est d'utiliser la fonction printf, dans ce genre là:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

printf "%02d:%02d:%02d\n", $heures, $minutes, $secondes;

Voir perldoc -f printf pour plus d'informations.

[dubis]

Merci estifilo ....
Il faut que j'arrive à utiliser printf ...