eval { main() };
if ($@) {
   warn "FATAL: $@"; ## all I want to do is warn about the fatal.
}

END {
   close_all_files();
   issue_done_to_server();
}