"Schupp Roderich (extern) Com MD PD SWP 2 CM MCH" wrote in perl.par :
>
> Turns out this is a problem with PAR::Filter::PodStrip when
> - the filtered file is in DOS (CR-LF) format
> - contains a __DATA__ section that consists of POD
>   (e.g. Net/LDAP/Constant.pm)
> Then the filter will mangle the __DATA__ section
> (replace it with a single #line directive).
>
> The reason is:
> - PAR::Filter slurps the file with $/=undef and in binmode,
>   hence its contents will contain CR-LFs, esp the substring
>   "...\015\012__DATA__\015\012..."
> - PAR::Filter::PodStrip uses 
>
>   $data = $1 if $$ref =~ s/((?:^__DATA__$).*)//ms;
>  
>   to strip and extract the __DATA__ section from the contents
>   (which it will re-append to the rest after filtering it).
>   But /^__DATA__$/ doesn't match the above substring because
>   "$" only matches \012 (regardless whether we're on Windows or Unix).
>
> Patch (vs PAR 0.89):

Nice catch.
Thanks, applied to http://svn.openfoundry.org/par/trunk as revision 14.

Reply via email to