Analyse de la date et de l'heure en perl correctes en micro / nano secondes - perl, date / heure

Je cherche un module perl qui prend une dateChaîne comme ceci "23 novembre 10: 42: 31.808381" et son format quelque chose comme "% b% d ...." ceci et obtenez-moi un objet dateTime / ou imprimez-le dans un autre format spécifié de la même manière. Time :: Piece n'a pas de résolution jusqu'à nano secondes. Y at-il un module qui m'aidera? J'utilise Perl 5.8 (cela n'a pas de références arrières nommées)

Réponses:

DateTime :: Format :: Strptime supporte les microsecondes et les nanosecondes.

Votre format est légèrement étrange, car il ne comprend pas une année. J’en ai ajouté un qui fait que ce code de démonstration fonctionne.

#!/usr/bin/perl

use strict;
use warnings;

use DateTime::Format::Strptime;

my $strp = DateTime::Format::Strptime->new(
pattern => "%b %d %Y %H:%M:%S.%6N",
on_error => "croak",
);

my $string = "Nov 23 2010 10:42:31.808381";

my $dt = $strp->parse_datetime($string);

print $dt->microsecond;

"23 novembre 10: 42: 31.808381" - en microsecondes et non en nanosecondes

Si vous avez besoin de microsecondes, vous devez utiliser Time :: HiRes; module et méthode gettimeofday en elle.