my $date = Time::Piece->strptime("01/02/2003",
                                 "%e/%B/%Y");
$t->created($date);

##</code><code>##

$t->created->dmy('/');

##</code><code>##

sub parse_date {
  return Time::Piece->strptime(shift, "%e/%B/%Y");
}

sub stringify_date {
  return shift->dmy('/');
}