tree 8e45484babb4cedc437a129a6a7285fc413c68ab
parent 81a6538077cc686ff825957770803d2ae88efaab
author Maxim Dounin <mdounin@mdounin.ru> 1562935165 +0300
committer Maxim Dounin <mdounin@mdounin.ru> 1562935165 +0300

Perl: avoid returning 500 if header was already sent.

Returning NGX_HTTP_INTERNAL_SERVER_ERROR if a perl code died after
sending header will lead to a "header already sent" alert.  To avoid
it, we now check if header was already sent, and return NGX_ERROR
instead if it was.