Select Code to Download

use CGI::Carp qw(set_die_handler);
BEGIN {
...
    }
    set_die_handler(\&handle_errors);
}