Marc

MARC ist eine Perl-Erweiterung, um maschinenlesbare Katalogaufzeichnungen zu manipulieren.
Jetzt downloaden

Marc Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • MARC Development team
  • Website des Verlags:
  • http://search.cpan.org/~bbirth/MARC-1.07/MARC.pm

Marc Stichworte


Marc Beschreibung

Marc ist eine Perl-Erweiterung, um Maschinen lesbare Katalogisierungsdatensätze zu manipulieren. Marc ist eine Perl-Erweiterung, um Maschinen lesbare Katalogisierungsaufzeichnungen zu manipulieren.Synopsis verwenden Marc; # konstruktoren $ x = marc-> neu (); $ x = marc-> neu ("Dateiname", "fileformat"); $ x-> openMARC ({file => "makrbrkr.mrc", 'Format' => "MarcMaker", Inkrement => "5", LineteM => "n", charet =>% char_hash}); $ record_num = $ X-> CreaterCord ({Leader => "00000nmm 2200000 A 4500"}); # Eingabe- / Ausgabedoperationen $ y = $ x-> nextmarc (10); # inkrementieren $ x-> closeMarc (); drucken $ x-> marc_count (); $ x-> deletemarc ({record => '2', feld => '110'}); $ y = $ x-> selectmarc (); # Zeichenübersetzung My% Inc =% {$ x-> usmarc_default ()}; # MarcMaker-Eingangs-Charset My% Outc =% {$ X-> usstext_default ()}; # Marcbreaker-Ausgangs-Charset # Datenabfragen @Records = $ x-> sucheMarc ({feld => "245"}); @Records = $ X-> sucheMarc ({feld => "260", subfield => "c", regex => "/ 19 ../"}); @Records = $ X-> sucheMarc ({feld => "245", notregex => "/ huckleberry / i"}); @Results = $ X-> GetValue ({Record => 12 ', Feld =>' 856 ', Subfield =>' u '}); # Header- und Kontrollfeldoperationen $ rldr = $ x-> pack_ldr ($ scard); drucken "DESC ist $ rldrldr -> {desc}"; Nächste, wenn ($ x-> bib_format ($ scips) EQ 'Serials'); $ rff = $ x-> packen_008 ($ scard); Letzte, wenn ($ RFF -> {'date1'} = ~ / 00 / oder $ RFF -> {'Date2'} = ~ / 00 /); # Datenänderungen $ x-> addfield ({record => "2", feld => "245", i1 => "1", i2 => "4", bestellt => 'y', Wert => }); mein $ update245 = {feld => '245', Record => 2, bestellt => 'y'}; My @ U245 = $ X-> GetUpdate ($ update245); $ x-> deletemarc ($ update245); $ x-> addfield ($ update245, @ u245_modified); # gibt $ y = $ X-> Ausgabe ({'Format' => "MarcMaker", Charset =>% OUTC}); $ X-> Ausgabe ({file => ">> my_text.txt", 'Format' => "ASCII", Record => 2}); $ X-> Ausgang ({file => "> my_marcmaker.mkr", 'Format' => "MarcMaker", nolinebreak => 'y', lineterm => 'n'}); $ X-> Ausgabe ({file => "> titles.html", 'Format' => "HTML", 245 => "Titel:"}); # Manipulation einzelner Marc-Datensätze. @Recs = $ x ; GREP {$ _-> pack_ldr () 0} @Recs; @LCS = GREP {$ _-> unrug_ldr {DESC} EQ 'A' $ _-> GetValue ({feld => '040'}) = ~ / dlcc_.dlc /} @Recs; FOREACH MEIN $ REC (@LCS) {drucken $ RECR-> Ausgabe ({Format => 'USMARC'}); } Manipulation als Saiten. FOREACH MEINE $ REC (@LCS) {MEINE $ stringvar = $ rec-> as_string (); $ stringvar = ~ s XM; # x bedeutet "ignorieren Sie Whitespace und erlauben Sie # eingebettete Kommentare zulassen". $ rec-> from_string ($ stringvar); mein ($ i2, $ Artikel) = $ stringvar = ~ / 245. (.) c _. (. {0,9}) /; $ Article = substr ($ Artikel, 0, $ i2), wenn i2 $ = ~ / d /; drucken "-Artikel $ Artikel ist nicht üblich," es sei denn, $ COMMON_ARTS {$ article}; } MARC.pm ist ein Modul, Perl 5 zum Einlesen, Manipulieren und bibliographische Aufzeichnungen in dem USMARC Format ausgibt. Sie müssen Perl 5.004 oder mehr haben für MARC.pm richtig zu arbeiten. Da es sich um ein Perl-Modul verwenden Sie MARC.pm von einem Ihrer eigenen Perl-Skripten. Um zu sehen, welche Art von Konvertierungen möglich sind, können Sie eine Web-Schnittstelle zu MARC.pm ausprobieren, die es Ihnen erlaubt, MARC-Dateien hochladen und die Ergebnisse abrufen (für weitere Einzelheiten den Abschnitt unter dem Titel Web Interface sehen). Allerdings bekommt die volle Funktionalität Sie wahrscheinlich MARC.pm auf Ihrem Server oder PC installiert werden sollen. MARC.pm können sowohl einzelne als auch Chargen von MARC-Datensätze verarbeiten. Die Grenze für die Anzahl der Datensätze in einer Charge wird durch die Speicherkapazität der Maschine bestimmt die ausgeführt werden. Wenn der Speicher ein Problem für Sie ist MARC.pm ermöglicht es Ihnen, in Datensätzen aus einer Charge allmählich zu lesen. MARC.pm enthält auch eine Vielzahl von Werkzeugen für die Suche, Entfernen und sogar Aufzeichnungen von Grund auf neu erstellen. Anforderungen: · Perl.


Marc Zugehörige Software