Perl filter and availiable headers

[F. Senault]

Hello all.
I've recently discovered that some of the checks I made with the perl
filters were useless since all the article headers aren't stored in
%hdr.

Seeing that, I poked around a bit in the code, and managed to do
something quite simple : a $hdr{__HEAD__} which contains the headers...
sort of.

Since the article parser writes in-place, some of the end-of-lines are
munged (\r\n becomes \0\n).  And I have the "takethis" part, too.

Somehow, it's sufficient for me, since I can still work around it with
perl, but I wondered if there is a need for a more elegant solution, and
if there is a chance to see it incorporated into the code ?

The diff is joined ; I'm open to any improvements (#define's around to
make it a compile-time option ? an innd option ?)...  I guess I should
be able to copy it into python code, too.

TIA,
        
Fred
-- 
All night, under red tavern lights  You can ask to see, Lola, Lola
All-night singing blood and soul    You can ask to see, Lola, Lola
All night, spitting blood and soul  You can scream it, Lola, Lola
All night, bleeding blood and soul  You can scream it (Noir Désir, Lola)