Skip Menu |
 

This queue is for tickets about the MARC-XML CPAN distribution.

Report information
The Basics
Id: 111473
Status: patched
Priority: 0/
Queue: MARC-XML

People
Owner: GMCHARLT [...] cpan.org
Requestors: Patrick.Hochstenbach [...] UGent.be
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 1.0.3
Fixed in: (no value)



Subject: Use of uninitialized value in concatenation (.) at end of stream
Download (untitled) / with headers
text/plain 782b
MARC::File::XML throws a warning error at the end of an XML stream. E.g. run this script use MARC::File::XML ( BinaryEncoding => 'utf8', RecordFormat => 'UNIMARC' ); my $filename = shift; my $file = MARC::File::XML->in( $filename ); $file->next(); $file->next(); On this file: <?xml version="1.0" encoding="UTF-8"?> <collection xmlns="http://www.loc.gov/MARC21/slim"> <record> <leader> cam a22 3u 4500</leader> <controlfield tag="001">530000001</controlfield> </record> </collection> The first next() return a record (as it should). The second next() return undef (as it should) but also throws a Use of uninitialized value in concatenation (.) or string at /opt/lludss-import/local/lib/perl5/MARC/File/XML.pm line 397, <__ANONIO__> chunk 3.
Download (untitled) / with headers
text/plain 285b
On Thu Jan 28 04:17:21 2016, HOCHSTEN wrote: Show quoted text
> Use of uninitialized value in concatenation (.) or string at > /opt/lludss-import/local/lib/perl5/MARC/File/XML.pm line 397, > <__ANONIO__> chunk 3.
Noting that the warning doesn't appear using Perl <= 5.14, but does show up with 5.20.
Download (untitled) / with headers
text/plain 203b
On Fri Jan 29 02:45:46 2016, JOROL wrote: Show quoted text
Thanks for the patch! It has been merged and will be included in the next release of MARC::File::XML.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.