conf/lookup/example.pm

=pod

=head1 NAME

WebPAC lookup file definition example

Required fields are C<key> and C<val>. Optional field C<eval> is perl code
to evaluate before storing value in lookup.

=cut

@lookup = (
        { 'key' => '900:v900', 'val' => 'filter{upper}v800' },
        { 'eval' => qq{length("v900") == 3},
                'key' => '900:v900', 'val' => 'v800'
        },
        { 'key' => '800:v800', 'val' => 'v900' },
        { 'key' => '000:v000', 'val' => 'v000' },
);
1	dpavlin	4	=pod
2
3			=head1 NAME
4
5			WebPAC lookup file definition example
6
7			Required fields are C<key> and C<val>. Optional field C<eval> is perl code
8			to evaluate before storing value in lookup.
9
10			=cut
11
12			@lookup = (
13	dpavlin	5	{ 'key' => '900:v900', 'val' => 'filter{upper}v800' },
14	dpavlin	4	{ 'eval' => qq{length("v900") == 3},
15			'key' => '900:v900', 'val' => 'v800'
16			},
17			{ 'key' => '800:v800', 'val' => 'v900' },
18			{ 'key' => '000:v000', 'val' => 'v000' },
19			);