sub create_table ($) {
  my($table_name) = $_;

  if (my $table_name eq /Doncaster_Deaths_1975_onwards_slim_D/){