bibliografija FFZG
[webpac2] / conf / bibliografija / baza-csa.pl
1 my $covpolicy;
2 my $covstatus;
3
4 ( $covpolicy, $covstatus ) = split(/\s*-\s*/, rec('F'));
5
6 row('rbaze',
7         baza => config('input name'),
8         isn => rec('B'),
9         eissn => rec('C'),
10         title => rec('A'),
11         coverage_policy => $covpolicy,
12         coverage_status => $covstatus,
13         publisher => rec('D'),
14         country => rec('E')
15 );