ISSN cleaning
[webpac2] / conf / bibliografija / baza-pi.pl
1 my @isn = regex('s/^.*(\d\d\d\w).*(\d\d\d\w).*/$1-$2/', rec('B'));
2
3 row('rbaze',
4         baza => config('input name'),
5         title => rec('A'),
6         isn => $isn[0],
7 );