Help for this page

Select Code to Download

Select or download this

<TMPL_LOOP NAME="links">
  <TMPL_IF NAME="linked">
...
    <TMPL_VAR NAME="link_text">
  </TMPL_IF>
</TMPL_LOOP>

Select or download this

my $CUR_MODE = ## (the current mode)

...
  push @menu, { link_url  => 'http://foo.com/?' . $_,
                link_text  => $modes{$_}
                $_ eq $CUR_MODE ? (linked => 0) : (linked => 1) }