and return
if $dt and $str;
$dt = eval { dt_from_string( $str ) } if $str;
if ( $str ) {
carp "Invalid date '$str' passed to output_pref\n" if $@;
$dt = eval { dt_from_string( $str ) };
}
return unless defined $dt;
-