/[webpac2]/trunk/t/conf/normalize/foo.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/t/conf/normalize/foo.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 686 by dpavlin, Sun Sep 24 17:25:04 2006 UTC revision 690 by dpavlin, Sun Sep 24 19:00:56 2006 UTC
# Line 1  Line 1 
1  marc('777','v',  marc('777','v',
2          lookup(          lookup(
3                  sub { '1st:' . rec('000') },                  sub { '1st-1' . rec('000') },
4                  'foo','peri',                  'foo','foo-input1',
5                    sub { rec('11') }
6            ) ||
7            lookup(
8                    sub { '1st-2' . rec('000') },
9                    'foo','foo-input2',
10                  sub { rec('11') }                  sub { rec('11') }
11          ) ||          ) ||
12          lookup(          lookup(
13                  sub { '2nd:' . rec('000') },                  sub { '2nd:' . rec('000') },
14                  'bar','peri',                  'bar','bar-input',
15                  sub { rec(200,'a') . rec('200','e') },                  sub { rec(200,'a') . rec('200','e') },
16          ) ||          ) ||
17          lookup(          lookup(
18                  sub { "3rd:" . rec('000') },                  sub { "3rd:" . rec('000') },
19                  'baz','peri',                  'baz','baz-input',
20                  sub { rec(200,'a') },                  sub { rec(200,'a') },
21                  sub { rec(900,'x') },                  sub { rec(900,'x') },
22          )          )
Legend:
Removed from v.686  
changed lines
  Added in v.690
  ViewVC Help
Powered by ViewVC 1.1.26