Perl DateTime Project
17
Modifiers
$dt->set( hour => 12 )
or
$dt->set_hour(12)
$dt->truncate( to => 'day' )
$dt->add( days => 1 )