conf/normalize/foo.pl

marc('777','v',
        lookup(
                sub { '1st-1' . rec('000') },
                'foo','foo-input1',
                sub { rec('11') }
        ) ||
        lookup(
                sub { '1st-2' . rec('000') },
                'foo','foo-input2',
                sub { rec('11') }
        ) ||
        lookup(
                sub { '2nd:' . rec('000') },
                'bar','bar-input',
                sub { rec(200,'a') . rec('200','e') },
        ) ||
        lookup(
                sub { "3rd:" . rec('000') },
                'baz','baz-input',
                sub { rec(200,'a') },
                sub { rec(900,'x') },
        )
);

1	dpavlin	686	marc('777','v',
2			lookup(
3	dpavlin	690	sub { '1st-1' . rec('000') },
4			'foo','foo-input1',
5	dpavlin	686	sub { rec('11') }
6			) \|\|
7			lookup(
8	dpavlin	690	sub { '1st-2' . rec('000') },
9			'foo','foo-input2',
10			sub { rec('11') }
11			) \|\|
12			lookup(
13	dpavlin	686	sub { '2nd:' . rec('000') },
14	dpavlin	689	'bar','bar-input',
15	dpavlin	686	sub { rec(200,'a') . rec('200','e') },
16			) \|\|
17			lookup(
18			sub { "3rd:" . rec('000') },
19	dpavlin	689	'baz','baz-input',
20	dpavlin	686	sub { rec(200,'a') },
21			sub { rec(900,'x') },
22			)
23			);
24