Date:: Formatter Perl el módulo es un objeto de formateo de Tiempo y Fecha simple.

SINOPSIS

use la Fecha:: Formatter;

# cree una Fecha:: Formatter objeto con la fecha corriente y tiempo.
mi $date = Fecha:: Formatter-> ahora ();

# cree una rutina formatter para este objeto
# ver la documentación de minilengua formatter abajo
$date-> createDateFormatter ("(hh): (mm): (ss) (MM) / (DD) / (YYYY)");

$date de letra; # imprimen la fecha en este formato-> 12:56:03 12/04/2004

# consiga el formatter para el uso con otros objetos
mi $formatter = $date-> getDateFormatter ();

# cree un intervalo de tiempo
mi $interval = Fecha:: Formatter-> createTimeInterval (años => 1, días => 2, protocolo => 15);

# reutilice el formater desde encima
$interval-> setDateFormatter ($formatter);

$interval de letra; # imprimen la fecha en este formato-> 12:56:03 12/04/2004

# use a operadores sobrecargados
mi $future_date = $date + $interval;

# clasifique las fechas (otra vez con el operador de sobrecarga)
mis @sorted_dates = clasifican {el $a <=> $b} ($date, $interval, $future_date);

Este módulo proporciona una minilengua rápida y muy flexible para estar usada en el formateo de fechas y tiempos. A fin de hacer esto útil aunque, tuviéramos que hacer una fecha que funciona totalmente & objeto de tiempo. Estas miradas de objeto y olores mucho como la Java y Fecha de Javascript se oponen a propósito. También sobrecargamos a varios operadores para permitir adición de fecha y substracción así como comparaciones.