File: Filter.html

package info (click to toggle)
libtemplate-perl 2.24-1
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 8,660 kB
  • sloc: perl: 14,518; makefile: 15; sh: 5
file content (489 lines) | stat: -rwxr-xr-x 25,187 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Strict//EN">
<html>
  <head>
    <title>Template::Plugin::Filter</title>
    <link rel="stylesheet" type="text/css" href="../../../css/blue.css" title="Clear Blue">
    <link rel="alternate stylesheet" type="text/css" href="../../../css/orange.css" title="Clear Orange">
    <link rel="alternate stylesheet" type="text/css" href="../../../css/green.css" title="Clear Green">
    <link rel="alternate stylesheet" type="text/css" href="../../../css/purple.css" title="Clear Purple">
    <link rel="alternate stylesheet" type="text/css" href="../../../css/grey.css" title="Clear Grey">
    <link rel="alternate stylesheet" type="text/css" href="../../../css/print.css" title="Print">
    <!--[if IE 6]>
    <link rel="stylesheet" type="text/css" href="../../../css/ie6.css" />
    <![endif]-->
    <!--[if IE 7]>
    <link rel="stylesheet" type="text/css" href="../../../css/ie7.css" />
    <![endif]-->
    <link rel="stylesheet" type="text/css" href="../../../css/print.css" media="print">
    <script type="text/javascript" src="../../../js/tt2.js"></script>
    <meta http-equiv="Content-Type" content="text/html;charset=utf-8">
    <meta name="author" content="Andy Wardley">
  </head>
  <body id="body"> 
    <div id="layout">
        <div id="header">
          <a href="../../../index.html" id="logo" alt="" title="Click for the Home Page"><span class="alt">TT2 Home Page</span></a>
          <ul id="trail">
            <li><a href="../../../modules/index.html">Modules</a></li>
            <li><a href="../../../modules/Template/index.html">Template::*</a></li>
            <li><a href="../../../modules/Template/Plugin/index.html">Plugin::*</a></li>
            <li class="last"><a href="../../../modules/Template/Plugin/Filter.html">Filter.pm</a></li>
          </ul>
          <div class="controls">
            <a href="#" class="menu show" onclick="widescreen_off(); return false" title="Show Menu">
              <span class="about">Click to view the menu.  It's very nice.</span>
            </a>
            <a href="#" class="menu hide" onclick="widescreen_on();  return false" title="Hide Menu">
              <span class="about">Click to hide the menu and go all widescreen!</span>
            </a>
          
          <div class="pager">
            <a href="../../../modules/Template/Plugin/File.html" title="Template::Plugin::File" class="go back">Back<span class="about"><h4>Template::Plugin::File</h4>Plugin providing information about files</span></a>
            <a href="../../../modules/Template/Plugin/index.html" title="Template::Plugin::* Modules" class="go up">Up<span class="about"><h4>Template::Plugin::* Modules</h4></span></a>
            <a href="../../../modules/Template/Plugin/Format.html" title="Template::Plugin::Format" class="go next">Next<span class="about"><h4>Template::Plugin::Format</h4>Plugin to create formatting functions</span></a>
          </div>
          </div>
          <h1 class="headline">Template::Plugin::Filter</h1>
          <h2 class="subhead">Base class for plugin filters</h1>
        
        </div>
        
        <div id="page">
          <div id="sidebar">
            <a href="../../../index.html" id="logo"></a>
            <div id="menu">
              <ul class="menu">
                <li class="l0 first"><a href="../../../manual/index.html">Manual</a></li>
                <li class="l0"><a href="../../../modules/index.html" class="warm">Modules</a></li>
                <li class="l1"><a href="../../../modules/Template.html">Template.pm</a></li>
                <li class="l1"><a href="../../../modules/Template/index.html" class="warm">Template::*</a></li>
                <li class="l2"><a href="../../../modules/Template/Base.html">Base.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Config.html">Config.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Constants.html">Constants.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Context.html">Context.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Directive.html">Directive.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Document.html">Document.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Exception.html">Exception.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Filters.html">Filters.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Grammar.html">Grammar.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Iterator.html">Iterator.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Namespace/index.html">Namespace::*</a></li>
                <li class="l2"><a href="../../../modules/Template/Parser.html">Parser.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Plugin.html">Plugin.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Plugin/index.html" class="warm">Plugin::*</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Assert.html">Assert.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/CGI.html">CGI.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Datafile.html">Datafile.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Date.html">Date.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Directory.html">Directory.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Dumper.html">Dumper.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/File.html">File.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Filter.html" class="warm">Filter.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Format.html">Format.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/HTML.html">HTML.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Image.html">Image.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Iterator.html">Iterator.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Math.html">Math.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Pod.html">Pod.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Procedural.html">Procedural.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Scalar.html">Scalar.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/String.html">String.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Table.html">Table.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/URL.html">URL.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/View.html">View.pm</a></li>
                <li class="l3"><a href="../../../modules/Template/Plugin/Wrap.html">Wrap.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Plugins.html">Plugins.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Provider.html">Provider.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Service.html">Service.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Stash.html">Stash.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/Stash/index.html">Stash::*</a></li>
                <li class="l2"><a href="../../../modules/Template/Test.html">Test.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/VMethods.html">VMethods.pm</a></li>
                <li class="l2"><a href="../../../modules/Template/View.html">View.pm</a></li>
                <li class="l0"><a href="../../../tools/index.html">Tools</a></li>
                <li class="l0"><a href="../../../tutorial/index.html">Tutorial</a></li>
                <li class="l0 last"><a href="../../../faq/index.html">FAQ</a></li>
              </ul>
              <div class="foot"></div>
            </div>
          </div>
          <div id="content">
          <div class="section">
            <div class="head">
              <h1 id="contents" onclick="switch_section(this)" title="Click title to show/hide section content.">Contents</h1>
              <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
            </div>
            <div class="body">
              <ul class="toc">
                  <li class=""><a href="#SYNOPSIS">SYNOPSIS</a></li>
                  <li class=""><a href="#DESCRIPTION">DESCRIPTION</a></li>
                  <li class=""><a href="#EXAMPLE">EXAMPLE</a></li>
                  <li class=""><a href="#AUTHOR">AUTHOR</a></li>
                  <li class=""><a href="#COPYRIGHT">COPYRIGHT</a></li>
                  <li class=""><a href="#SEE_ALSO">SEE ALSO</a></li>
              
              </ul>
            </div>
          </div>
          
                <div class="pod">
            <div class="section">
              <div class="head">
                <h1 id="SYNOPSIS" onclick="switch_section(this)" title="Click title to show/hide section content.">SYNOPSIS</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <pre>package MyOrg::Template::Plugin::MyFilter;

use Template::Plugin::Filter;
use base qw( Template::Plugin::Filter );

sub filter {
    my ($self, $text) = @_;

    # ...mungify $text...

    return $text;
}

# now load it...
<span class="tt">[% USE MyFilter %]</span>

# ...and use the returned object as a filter
<span class="tt">[% FILTER $MyFilter %]</span>
  ...
<span class="tt">[% END %]</span></pre>
              </div>
            </div>
            <div class="section">
              <div class="head">
                <h1 id="DESCRIPTION" onclick="switch_section(this)" title="Click title to show/hide section content.">DESCRIPTION</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <p>
                      This module implements a base class for plugin filters. It hides the
                      underlying complexity involved in creating and using filters that get
                      defined and made available by loading a plugin.
                    </p>
                    <p>
                      To use the module, simply create your own plugin module that is inherited
                      from the <code>Template::Plugin::Filter</code> class.
                    </p>
                    <pre>package MyOrg::Template::Plugin::MyFilter;

use Template::Plugin::Filter;
use base qw( Template::Plugin::Filter );</pre>
                    <p>
                      Then simply define your <code>filter()</code> method. When called, you
                      get passed a reference to your plugin object (<code>$self</code>) and the
                      text to be filtered.
                    </p>
                    <pre>sub filter {
    my ($self, $text) = @_;

    # ...mungify $text...

    return $text;
}</pre>
                    <p>
                      To use your custom plugin, you have to make sure that the Template
                      Toolkit knows about your plugin namespace.
                    </p>
                    <pre>my $tt2 = Template-&gt;new({
    PLUGIN_BASE =&gt; 'MyOrg::Template::Plugin',
});</pre>
                    <p>
                      Or for individual plugins you can do it like this:
                    </p>
                    <pre>my $tt2 = Template-&gt;new({
    PLUGINS =&gt; {
        MyFilter =&gt; 'MyOrg::Template::Plugin::MyFilter',
    },
});</pre>
                    <p>
                      Then you <code>USE</code> your plugin in the normal way.
                    </p>
                    <pre><span class="tt">[% USE MyFilter %]</span></pre>
                    <p>
                      The object returned is stored in the variable of the same name,
                      '<code>MyFilter</code>'. When you come to use it as a
                      <code>FILTER</code>, you should add a dollar prefix. This indicates that
                      you want to use the filter stored in the variable '<code>MyFilter</code>'
                      rather than the filter named '<code>MyFilter</code>', which is an
                      entirely different thing (see later for information on defining filters
                      by name).
                    </p>
                    <pre><span class="tt">[% FILTER $MyFilter %]</span>
   ...text to be filtered...
<span class="tt">[% END %]</span></pre>
                    <p>
                      You can, of course, assign it to a different variable.
                    </p>
                    <pre><span class="tt">[% USE blat = MyFilter %]</span>

<span class="tt">[% FILTER $blat %]</span>
   ...text to be filtered...
<span class="tt">[% END %]</span></pre>
                    <p>
                      Any configuration parameters passed to the plugin constructor from the
                      <code>USE</code> directive are stored internally in the object for
                      inspection by the <code>filter()</code> method (or indeed any other
                      method). Positional arguments are stored as a reference to a list in the
                      <code>_ARGS</code> item while named configuration parameters are stored
                      as a reference to a hash array in the <code>_CONFIG</code> item.
                    </p>
                    <p>
                      For example, loading a plugin as shown here:
                    </p>
                    <pre><span class="tt">[% USE blat = MyFilter 'foo' 'bar' baz = 'blam' %]</span></pre>
                    <p>
                      would allow the <code>filter()</code> method to do something like this:
                    </p>
                    <pre>sub filter {
    my ($self, $text) = @_;

    my $args = $self-&gt;{ _ARGS   };  # [ 'foo', 'bar' ]
    my $conf = $self-&gt;{ _CONFIG };  # { baz =&gt; 'blam' }

    # ...munge $text...

    return $text;
}</pre>
                    <p>
                      By default, plugins derived from this module will create static filters.
                      A static filter is created once when the plugin gets loaded via the
                      <code>USE</code> directive and re-used for all subsequent
                      <code>FILTER</code> operations. That means that any argument specified
                      with the <code>FILTER</code> directive are ignored.
                    </p>
                    <p>
                      Dynamic filters, on the other hand, are re-created each time they are
                      used by a <code>FILTER</code> directive. This allows them to act on any
                      parameters passed from the <code>FILTER</code> directive and modify their
                      behaviour accordingly.
                    </p>
                    <p>
                      There are two ways to create a dynamic filter. The first is to define a
                      <code>$DYNAMIC</code> class variable set to a true value.
                    </p>
                    <pre>package MyOrg::Template::Plugin::MyFilter;
use base 'Template::Plugin::Filter';
our $DYNAMIC = 1;</pre>
                    <p>
                      The other way is to set the internal <code>_DYNAMIC</code> value within
                      the <code>init()</code> method which gets called by the
                      <code>new()</code> constructor.
                    </p>
                    <pre>sub init {
    my $self = shift;
    $self-&gt;{ _DYNAMIC } = 1;
    return $self;
}</pre>
                    <p>
                      When this is set to a true value, the plugin will automatically create a
                      dynamic filter. The outcome is that the <code>filter()</code> method will
                      now also get passed a reference to an array of postional arguments and a
                      reference to a hash array of named parameters.
                    </p>
                    <p>
                      So, using a plugin filter like this:
                    </p>
                    <pre><span class="tt">[% FILTER $blat 'foo' 'bar' baz = 'blam' %]</span></pre>
                    <p>
                      would allow the <code>filter()</code> method to work like this:
                    </p>
                    <pre>sub filter {
    my ($self, $text, $args, $conf) = @_;

    # $args = [ 'foo', 'bar' ]
    # $conf = { baz =&gt; 'blam' }
}</pre>
                    <p>
                      In this case can pass parameters to both the USE and FILTER directives,
                      so your filter() method should probably take that into account.
                    </p>
                    <pre><span class="tt">[% USE MyFilter 'foo' wiz =&gt; 'waz' %]</span>

<span class="tt">[% FILTER $MyFilter 'bar' biz =&gt; 'baz' %]</span>
   ...
<span class="tt">[% END %]</span></pre>
                    <p>
                      You can use the <code>merge_args()</code> and <code>merge_config()</code>
                      methods to do a quick and easy job of merging the local (e.g.
                      <code>FILTER</code>) parameters with the internal (e.g. <code>USE</code>)
                      values and returning new sets of conglomerated data.
                    </p>
                    <pre>sub filter {
    my ($self, $text, $args, $conf) = @_;

    $args = $self-&gt;merge_args($args); 
    $conf = $self-&gt;merge_config($conf);

    # $args = [ 'foo', 'bar' ]      
    # $conf = { wiz =&gt; 'waz', biz =&gt; 'baz' }        
    ...
}</pre>
                    <p>
                      You can also have your plugin install itself as a named filter by calling
                      the <code>install_filter()</code> method from the <code>init()</code>
                      method. You should provide a name for the filter, something that you
                      might like to make a configuration option.
                    </p>
                    <pre>sub init {
    my $self = shift;
    my $name = $self-&gt;{ _CONFIG }-&gt;{ name } || 'myfilter';
    $self-&gt;install_filter($name);
    return $self;
}</pre>
                    <p>
                      This allows the plugin filter to be used as follows:
                    </p>
                    <pre><span class="tt">[% USE MyFilter %]</span>

<span class="tt">[% FILTER myfilter %]</span> 
   ... 
<span class="tt">[% END %]</span></pre>
                    <p>
                      or
                    </p>
                    <pre><span class="tt">[% USE MyFilter name = 'swipe' %]</span>

<span class="tt">[% FILTER swipe %]</span> 
   ... 
<span class="tt">[% END %]</span></pre>
                    <p>
                      Alternately, you can allow a filter name to be specified as the first
                      positional argument.
                    </p>
                    <pre>sub init {
    my $self = shift;
    my $name = $self-&gt;{ _ARGS }-&gt;[0] || 'myfilter';
    $self-&gt;install_filter($name);
    return $self;
}

<span class="tt">[% USE MyFilter 'swipe' %]</span>

<span class="tt">[% FILTER swipe %]</span>
   ...
<span class="tt">[% END %]</span></pre>
              </div>
            </div>
            <div class="section">
              <div class="head">
                <h1 id="EXAMPLE" onclick="switch_section(this)" title="Click title to show/hide section content.">EXAMPLE</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <p>
                      Here's a complete example of a plugin filter module.
                    </p>
                    <pre>package My::Template::Plugin::Change;
use Template::Plugin::Filter;
use base qw( Template::Plugin::Filter );

sub init {
    my $self = shift;

    $self-&gt;{ _DYNAMIC } = 1;

    # first arg can specify filter name
    $self-&gt;install_filter($self-&gt;{ _ARGS }-&gt;[0] || 'change');

    return $self;
}

sub filter {
    my ($self, $text, $args, $config) = @_;

    $config = $self-&gt;merge_config($config);
    my $regex = join('|', keys %$config);

    $text =~ s/($regex)/$config-&gt;{ $1 }/ge;

    return $text;
}

1;</pre>
              </div>
            </div>
            <div class="section">
              <div class="head">
                <h1 id="AUTHOR" onclick="switch_section(this)" title="Click title to show/hide section content.">AUTHOR</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <p>
                      Andy Wardley &lt;abw@wardley.org&gt; <a
                      href="http://wardley.org/">http://wardley.org/</a>
                    </p>
              </div>
            </div>
            <div class="section">
              <div class="head">
                <h1 id="COPYRIGHT" onclick="switch_section(this)" title="Click title to show/hide section content.">COPYRIGHT</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <p>
                      Copyright (C) 1996-2007 Andy Wardley. All Rights Reserved.
                    </p>
                    <p>
                      This module is free software; you can redistribute it and/or modify it
                      under the same terms as Perl itself.
                    </p>
              </div>
            </div>
            <div class="section">
              <div class="head">
                <h1 id="SEE_ALSO" onclick="switch_section(this)" title="Click title to show/hide section content.">SEE ALSO</h1>
                <a href="#body" class="top" title="Back up to the top of the page" >Top</a>
              </div>
              <div class="body">
                <p>
                      <a href="../../../modules/Template/Plugin.html">Template::Plugin</a>, <a
                      href="../../../modules/Template/Filters.html">Template::Filters</a>, <a
                      href="../../../manual/Filters.html">Template::Manual::Filters</a>
                    </p>
              </div>
            </div>
            
            </div></div>
          <br class="clear" />
          <div class="pageinfo">
            <a href="http://template-toolkit.org/docs/modules/Template/Plugin/Filter.html">http://template-toolkit.org/docs/modules/Template/Plugin/Filter.html</a>
          </div>
        </div>
        
        <div id="footer">
          <a href="http://opensource.org/" class="osi"></a>
          <div class="controls">
          <div class="pager">
            <a href="../../../modules/Template/Plugin/File.html" title="Template::Plugin::File" class="go back">Back<span class="about"><h4>Template::Plugin::File</h4></span></a>
            <a href="../../../modules/Template/Plugin/index.html" title="Template::Plugin::* Modules" class="go up">Up<span class="about"><h4>Template::Plugin::* Modules</h4></span></a>
            <a href="../../../modules/Template/Plugin/Format.html" title="Template::Plugin::Format" class="go next">Next<span class="about"><h4>Template::Plugin::Format</h4></span></a>
          </div>
          </div>
          <div class="copyright">
            Copyright &copy; 1996-2012 <a href="http://wardley.org/">Andy Wardley</a>.  All Rights Reserved.
          </div>
          <div class="licence">
            The <a href="http://template-toolkit.org/">Template Toolkit</a> is <a href="http://opensource.org/">Open Source</a> software.
            You can redistribute and/or modify it under the terms of the <a href="http://www.opensource.org/licenses/gpl-license.php">GNU Public Licence</a>
            or the <a href="http://www.opensource.org/licenses/artistic-license.php">Perl Artistic Licence</a>.
          </div>
        </div>
        <div id="palette">
          <ul>
            <li class="first"><a href="#" class="blue" onclick="set_style('Clear Blue')"></a></li>
            <li><a href="#" class="orange" onclick="set_style('Clear Orange')"></a></li>
            <li><a href="#" class="green" onclick="set_style('Clear Green')"></a></li>
            <li><a href="#" class="purple" onclick="set_style('Clear Purple')"></a></li>
            <li><a href="#" class="grey" onclick="set_style('Clear Grey')"></a></li>
          </ul>
        </div>
    </div>  </body>
</html>