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

   1 my $isn;
   2 my $eissn = '';
   3
   4 ( $isn, $eissn ) = regex('s/\s*$//', split(/\s*;\s*/, rec('B')));
   5
   6 row('rbaze',
   7         baza => config('input name'),
   8         isn => $isn,
   9         eissn => $eissn,
  10         title => rec('A')
  11 );