Bug#641796: libx500-dn-perl: X500::DN triggers warning in Parse::RecDescent

[John Hughes]

On 16/09/11 12:31, Damyan Ivanov wrote:
> -=| John Hughes, 16.09.2011 11:55:48 +0200 |=-
>    
>> Package: libx500-dn-perl
>> Version: 0.29-4
>> Severity: normal
>>
>> $ perl -we 'use X500::DN'
>> Use of uninitialized value $Parse::RecDescent::skip in concatenation (.) or string at /usr/share/perl5/Parse/RecDescent.pm line 2811.
>>
>> Don't know whether the bug is in Parse::RecDescent or X500::DN.
>>
>> Suse bug 653512 might have something to do with this.
>> https://bugzilla.novell.com/show_bug.cgi?id=653512
>>      
> It seems to me that X500::DN does this by itself:
>
>      DN.pm:46:local $Parse::RecDescent::skip = undef;
>    

Ew.
> Using '' (the empty string) instead of undef on line 46 of DN.pm seems
> to silence the warning and the test suite still passes.
>
> I'll report this upstream (latest release in 2007, though).
>    
Thanks.