MARC::...er::XML(3pm)

🌸 NAME 🌸

okay so bestie, let me introduce you to MARC::Parser::XML — it's the parser for MARC XML records. that's the whole vibe. the manual page for it is MARC::Parser::XML(3pm), and yeah the header truncates it like MARC::...er::XML(3pm) because manpage headers are dramatic like that 💅

---

✨ SYNOPSIS ✨

literally all you need, no cap:

use MARC::Parser::XML;

my $parser = MARC::Parser::XML->new( 't/marc.xml' );

while ( my $record = $parser->next() ) {
    # do something ...
}

---

💖 DESCRIPTION 💖

MARC::Parser::XML is a lightweight, fault tolerant parser for MARC XML records. 🦋

here's the tea though — tags, indicators and subfield codes are NOT validated against the MARC standard. it's giving "we trust you, bestie" energy. no vibe check on your data, it just parses.

and the resulting data structure? it's optimized for usage with the Catmandu data tool kit. that's the whole point. iykyk 😌

---

🎀 MARC 🎀

the MARC record gets parsed into an ARRAY of ARRAYs. she's nested, she's iconic, she's a little chaotic:

$record = [
        [ 'LDR', undef, undef, '_', '00661nam  22002538a 4500' ],
        [ '001', undef, undef, '_', 'fol05865967 ' ],
        ...
        [   '245', '1', '0', 'a', 'Programming Perl /',
            'c', 'Larry Wall, Tom Christiansen & Jon Orwant.'
        ],
        ...
    ];

see how the subfields just keep going? a then the value, c then the value. no cap, that's the shape. 🌈

---

🫶 METHODS 🫶

💜 new($file|$fh|$xml)

this is the constructor, the main character of getting started. you can feed her three different things and she'll take any of them:

• "file" — path to file with MARC XML records. just hand her a path and she'll go find it. 🍓
• "fh" — open filehandle for MARC XML records. already got one open? slay, pass it in.
• "xml" — XML string. raw string of XML? she eats that too. 💅

🌸 next()

reads the next record from MARC input. that's it, that's the whole job. call it in a loop and she keeps handing you records until there aren't any left. periodt. ✨

🧚 _decode($record)

deserialize a raw MARC record to an ARRAY of ARRAYs. this is the internal glow-up that turns the raw stuff into the pretty nested structure. 🔥

---

👑 AUTHOR 👑

Johann Rolschewski <jorol@cpan.org> — the legend, the icon, the moment. 💖

---

🎀 COPYRIGHT 🎀

Copyright 2016- Johann Rolschewski

---

💖 LICENSE 💖

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. 🫶

---

🌈 SEE ALSO 🌈

okay bestie, this section is genuinely empty in the original. no cross-references, no extra reading, nothing. she stands alone. main character energy fr fr 💅

---

and that's the whole page!! this was MARC::...er::XML(3pm) from perl v5.32.1, dated 2021-09-29 — mwah, go parse some records, you got this 🦋✨💜