git.rot13.org Git - webpac2/blob - conf/normalize/excel-wiley.pl

   1 marc_leader('05','n');
   2 marc_leader('06','a');
   3 marc_leader('07','s');
   4 marc_leader('18','i');
   5
   6 marc('022','a',
   7         lookup(
   8                 sub { rec('B') },
   9                 'wiley','full',
  10                 sub {
  11                         regex('s/\s*(\.|:|\-|\(|\)|and|&)\s*//g',
  12                                 lc( rec('A') )
  13                         );
  14                 },
  15         )
  16 );
  17
  18 marc('022','y',
  19         lookup(
  20                 sub { rec('C') },
  21                 'wiley','full',
  22                 sub {
  23                         regex('s/\s*(\.|:|\-|\(|\)|and|&)\s*//g',
  24                                 lc( rec('A') )
  25                         );
  26                 },
  27         )
  28 );
  29
  30 marc_indicators('245', 1, 0);
  31
  32 marc('245','a',
  33         rec('A')
  34 );
  35
  36 marc('245','h',
  37         '[ Elektronièka graða ]'
  38 );
  39
  40 marc('500','a',
  41         lookup(
  42                 sub { 'Full Text dostupan od: ' . rec('V') },
  43                 'wiley','full',
  44                 sub {
  45                         regex('s/\s*(\.|:|\-|\(|\)|and|&)\s*//g',
  46                                 lc( rec('A') )
  47                         );
  48                 },
  49         )
  50 );
  51
  52 marc('856','u',
  53         lookup(
  54                 sub { rec('D') },
  55                 'wiley','full',
  56                 sub {
  57                         regex('s/\s*(\.|:|\-|\(|\)|and|&)\s*//g',
  58                                 lc( rec('A') )
  59                         );
  60                 },
  61         )
  62 );
  63