MARC :: FILE :: MARCMAKER.

MARC :: FILE :: MARCMAKER´Â MarcMaker / Marcbreaker ·¹ÄÚµå·Î ÀÛ¾÷ ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

MARC :: FILE :: MARCMAKER. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Bryan Baldus
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~eijabb/MARC-File-MARCMaker-0.05/lib/MARC/File/MARCMaker.pm

MARC :: FILE :: MARCMAKER. ű×


MARC :: FILE :: MARCMAKER. ¼³¸í

Marc :: File :: MarcMaker´Â MarcMaker / Marcbreaker ·¹ÄÚµå·Î ÀÛ¾÷ ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Marc :: File :: MarcMaker´Â MarcMaker / MarcBreaker Records.Synopsis »ç¿ë Marc :: File :: Marcmaker; ³» $ file = marc :: file :: marcmaker-> in ($ filename); while (my $ marc = $ file-> next ()) {# ¹º°¡} $ file-> close (); Undef $ FILE; ################################################# ###### MARC :: FILE :: MARCMAKER; MARC :: BATCH ³» $ BATCH = MARC :: BATCH-> NEW ( 'MARCMAKER', $ FILENAME); MY $ RECORD = $ BATCH-> NEXT (); ## ¶Ç´Â MARC :: FILE :: MARCMAKER°¡ ¸í½Ã ÀûÀ¸·Î ³» $ FILE = MARC :: FILE :: MARCMAKER-> IN ($ Filename); MY $ RECORD = $ FILE-> next (); ## marcmaker Çü½ÄÀÇ ´ÜÀÏ marc :: ·¹ÄÚµå °³Ã¼ (Æ÷¸Ë µÈ ÀÏ¹Ý ÅؽºÆ®) #print $ ·¹ÄÚµå -> as_marcmaker (); #GOAL ±¸¹® Àμâ MARC :: FILE :: MARCMAKER-> ÀÎÄÚµù ($ ·¹ÄÚµå); #urrent ±¸¹® ¿ä±¸ »çÇ× : ¡¤ Perl.


MARC :: FILE :: MARCMAKER. °ü·Ã ¼ÒÇÁÆ®¿þ¾î