
marc('777','v',
	lookup(
		sub { 'ffkk/perl' . rec('000') },
		'ffkk','peri',
		sub { rec('11') },
		sub { rec('11') },
	) ||
	lookup(
		sub { 'ffkk/perl' . rec('000') },
		'ffkk','peri',
		sub { rec('200','a') . rec('200','e') },
	) ||
	lookup(
		sub { 'ffkk/perl' . rec('000') },
		'ffkk','peri',
		sub { rec('200','a') },
	)
);
