conf/lookup/ffkk-arti.pl


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') },
        )
);
1
2	marc('777','v',
3	lookup(
4	sub { 'ffkk/perl' . rec('000') },
5	'ffkk','peri',
6	sub { rec('11') },
7	sub { rec('11') },
8	) \|\|
9	lookup(
10	sub { 'ffkk/perl' . rec('000') },
11	'ffkk','peri',
12	sub { rec('200','a') . rec('200','e') },
13	) \|\|
14	lookup(
15	sub { 'ffkk/perl' . rec('000') },
16	'ffkk','peri',
17	sub { rec('200','a') },
18	)
19	);