git.rot13.org Git - webpac2/blob - conf/bibliografija/baza-geobase.pl

   1 my @isn = regex('s/^.*(\d\d\d\w)(\d\d\d\w).*/$1-$2/', rec('C'));
   2
   3 row('rbaze',
   4         baza => config('input name'),
   5         title => rec('A'),
   6         source_type => rec('B'),
   7         isn => $isn[0],
   8         eissn => rec('D'),
   9         publisher => rec('E'),
  10         country => rec('F'),
  11         coverage_policy => rec('G'),
  12         subject => join_with(' -- ',
  13                         rec('H'),
  14                         rec('I'),
  15                         rec('J'),
  16                         rec('K'),
  17                         rec('L'),
  18                         rec('M'),
  19                         rec('N')
  20                 )
  21 );