>There is code in MARC::File::MicroLIF::_get_chunk that handles DOS
>(\r\n) and Unix (\n) line endings, but not Mac (\r).
This is true, and it seems to work. Unfortunately, it is not reached by the
test, since the test calls decode() directly, instead of going through
_next() or _get_chunk.
Perhaps the:
# for ease, make the newlines match this platform
$lifrec =~ s/[\x0a\x0d]+/\n/g if defined $lifrec;
in _next() should be moved (or added as duplicate code) to decode() just
between the lines:
my $marc = MARC::Record->new();
### $text =~ s/[\x0a\x0d]+/\n/g if defined $text;
my @lines = split( /\n/, $text );
Bryan Baldus
[EMAIL PROTECTED]
[EMAIL PROTECTED]
http://home.inwave.com/eija
