[Perl] Conversion date en secondes Epoch

Résolu/Fermé
pianoclassique Messages postés 108 Date d'inscription jeudi 10 avril 2008 Statut Membre Dernière intervention 19 janvier 2009 - 20 avril 2008 à 14:01
pianoclassique Messages postés 108 Date d'inscription jeudi 10 avril 2008 Statut Membre Dernière intervention 19 janvier 2009 - 20 avril 2008 à 14:27
Bonjour,
Désolé je déconnecter l'internet quelque minute et je ne sais pas si tu me répondre a mon question ou pas ,je répéte mon question:

Je veu un script complet avec ces syntaxe et ces prototypes comme dans le C ou le C++ .

Dans mon cas je veu un script perl qui convertir une date et un temps sous la forme de : secondes ,minutes , heure jours ,mois ,annee en une code Epoch.

Ce script n'a aucun relation de fichier log de mrtg juste je le donne une date et un temps , il les converti en Epoch.
C'est juste de la programmation.



Par exemple:

je saisie les donner suivant : 10:30:55 12/04/2008

Le resultat : 1036567881

Merci..............</gras>

2 réponses

lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 3 567
20 avril 2008 à 14:21
Salut,

lami20j@debian:~/trash$ cat time2epoch.pl
#!/usr/bin/perl
use strict;use warnings;
use Time::Local;

print "Date au format jj/mm/aaaa : ";
chomp(my $d = <STDIN>);
print "Heure au format hh:mm:ss : ";
chomp(my $h = <STDIN>);

my ($heure,$min,$sec) = split /:/,$h;
my ($jour,$mois,$annee) = split /\//,$d;

my $epoch = timegm($sec, $min, $heure, $jour, $mois-1, $annee-1900);
print "$h $d -> epoch : $epoch\n";
__END__
lami20j@debian:~/trash$ perl time2epoch.pl
Date au format jj/mm/aaaa : 12/04/2008
Heure au format hh:mm:ss : 10:30:55
10:30:55 12/04/2008 -> epoch : 1207996255

2
pianoclassique Messages postés 108 Date d'inscription jeudi 10 avril 2008 Statut Membre Dernière intervention 19 janvier 2009 4
20 avril 2008 à 14:27
Salut



merci pour ton aide ......

SVP si tu peu me donne un commentaire pour chaque ligne ou bloc de la script.


Merci.....................
0