From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sat, 17 Oct 2009 05:45:59 +0000 (+0200)
Subject: fix header output triggered by say() in perl 5.10.1+
X-Git-Tag: 3.23~5
X-Git-Url: http://git.shiar.net/perl/plp/.git/commitdiff_plain/3dd60490b2f12aeabc457292b87fe43772ce0304?hp=3dd60490b2f12aeabc457292b87fe43772ce0304

fix header output triggered by say() in perl 5.10.1+

Since the latest Perl release, calling sendheaders() from within a say()
would (correctly) retain a custom output seperator, resulting in http
headers being sent incorrectly.

Easily fixed by resetting normal printing behaviour.
---