...
eval {
  $tz = DateTime::TimeZone->new( name => 'Europe/London' );
  $DT = DateTime->new( year => $year, time_zone => $tz ); 
};
return if $@;
...