my @isn = regex('s/^.*(\d\d\d\w).*(\d\d\d\w).*/$1-$2/', rec('B'));

row('rbaze',
	baza => config('input name'),
	title => rec('A'),
	isn => $isn[0],
);
